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The Woz Wonderbook 

Introduction 

A compendium of notes, diagrams, articles, instructions and code that 
describes the Apple ][ computer and how to program it. 



What is the Woz Wonderbook? 

The Woz Wonderbook was pulled together from Steve Wozniak's file drawers in 
the Summer and Fall of 1977 and served as the key reference describing the 
Apple ][ for Apple's own employees. The Wonderbook served as a primary source 
for the first real Apple ][ manual, the Red Book, published in January 1978. 
Apple ] [ sales were increasing since its introduction at the West Coast 
Computer Fair in April 1977 and Woz and a team at Apple used the Wonderbook 
to bridge the gap in documentation as Apple and Steve Jobs realized they had 
to create a more professional product and manuals. There was only one Woz 
Wonderbook in the Apple library. The Woz Wonderbook at the DigiBarn was one 
of only a few copies made of this master by Apple employees at the time for 
internal use. 



Facts about the Woz Wonderbook 

Author : 

Steve Wozniak (www.woz.org <http://www.woz.org/) 

Document dates of record: 

September 20, 1977-November 15, 1977 

Owner : 

DigiBarn Computer Museum (www.digibarn.com), 
Curator Bruce Darner (http://www.damer.com/). 

DigiBarn's pages on the Wonderbook including this version can be found at: 
http : //www. di gi barn . com/ col lections /books /woz -wonder book/ 

This Wonderbook was discarded by Apple Computer Inc. (http://www.apple.com/) 
and recovered by Bill Goldberg who later donated it to the DigiBarn Computer 
Museum . 

This Wonderbook was scanned and resurrected in October 2004 into PDF format 
by David T Craig (shirlgato@cybermesa.com). 

This digital rendition of the Woz Wonderbook is available for non-commercial, 
educational and research purposes with the requirement to provide attribution 
and share-alike under the Creative Commons license provided on page 5. 
All other uses require the agreement of the DigiBarn Computer Museum (contact 
through www.digibarn.com). 
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The Woz Wonderbook 

Property Statement 



This Woz Wonderbook is the property of the DigiBarn Computer Museum which is 
offering it under the following Creative Commons License found on page 5. 

Under the terms of this license you must credit the DigiBarn Computer Museum, 
Steve Wozniak and Apple Computer, Inc. if whole or part of this Wonderbook is 
used for non commercial / educational or research purposes. All other uses 
require the agreement of the DigiBarn Computer Museum (contact through 
www . di gi barn . com) . 

We would like to acknowledge Bill Goldberg for providing us this copy of the 
Woz Wonderbook. 

The author of the Woz Wonderbook is Steve Wozniak. 
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©creative 
commons 

C O M M O N S D K K I) 

Creative Commons 
Attribution - Non Commercial - Share Alike 1.0 

You are free: 

* to copy, distribute, display, and perform the work 

* to make derivative works 

Under the following conditions: 




Attribution. You must give the original author credit. 




Noncommercial. You may not use this work for commercial purposes. 




Share Alike. If you alter, transform, or build upon this work, you may 
distribute the resulting work only under a license identical to this 
one . 

* For any reuse or distribution, you must make clear to others the 
license terms of this work. 

* Any of these conditions can be waived if you get permission from 
the copyright holder. 

Your fair use and other rights are in no way affected by the above. 

This is a human- readable summary of the Legal Code. 
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Disclaimer 

The Commons Deed is not a license. It is simply a handy reference for 
understanding the Legal Code (the full license) - it is a human- 
readable expression of some of its key terms. Think of it as the user- 
friendly interface to the Legal Code beneath. This Deed itself has no 
legal value, and its contents do not appear in the actual license. 

Creative Commons is not a law firm and does not provide legal services. 
Distributing of, displaying of, or linking to this Commons Deed does 
not create an attorney-client relationship. 



For the full legal code for this license see: 



http: //creati vecommons .org/1 icenses/by-nc- sa/2 .0/ 
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9/20/77 
Woz 



AUTO RLPEAT FOR APPLE -II MONITOR COMMANDS 

It is occasionally desirable to automatically repeat a MONITOR command 
or r . . and sequence on the APPLE II computer. For example, flaky (inter- 
mittently bad) RAM bits in the $800 - $FFF address range ($ stands for hex) 
may be detected by verifying those locations with themselves using the MON- 
ITOR verify a. \. rid: 

*800<EU0.FFF\V(no blanks) (A is car ret) 

Because this problem is intermittent, multiple verifications may be 
necessary before the problem is detected. Typing the verify command over and 
over is a tedious chore which may not even catch the bug, particularly since the 
RAMS are not fully exercised while the user is typing. 

The APPLE - II MONITOR conmand input buffer begins at location $200 and 
is scanned from beginning to end after the user finishes the line by typing 
a carriage return. An index to the next executable character of the buffer 
resides in location $34 while any function is being executed. By adding 
the command '34:0' to the end of a MONITOR command sequence the user causes 
scanning to resume at the begi nni ng. Because the '34:0' command leaves 
the MONITOR in 'store' more, an ' N 1 command should begin the line. The 
following is an example of a comviand sequence which verifies locations 
$800 - $FFF with themselves, automatically repeating. 

*N800<800.FFFV 34:0 Hi ()f is blank) 

(Note that the trailing blank is necessary for this feature to 
work properly) 

Multiple connand sequences accepted by the Apple II MONITOR may also 
be automatically repeated. For example, the following command sequence clears 
all bits in the address range $400 - $5FF, verifies these locations with 
themselves, sets them all to ones, verifies them again, and repeats: 

*N-;00:0 N401<400.5FEM 400<400.5FFV 400:FF P N401 <400. 5FEM 
400--400.5FFV 34:0 A 
}4 is necessary blank 
is car return 

Because this example uses screen memory locations, it is observable on 
the display. The repeating command may be halted by hitting RESET. Since the 
cursor is only generated for keyboard entry, it will disappear while the ex- 
ample repeats. 
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The following section covers use of the Apple II mini- 
assembler only. It is not a course 'in assembly language 
programming. For a reference on programming the 6502 micro- 
processor, refer to the HOS Technology Programming manual. 
The following section assumes the user has a working know- 
ledge of 6502 programming and mnemonics. 

The Apple II mi n i -a s sembl er is a programming aid ai'med 
at reducing the amount of time required to convert a hand- 
written program to object code. The mi ni -assembl er i s 
basically a look-up table for opcodes. Wit it, you can type 
mnemonics with their absolute addresses, and the assembler 
will convert it to the correct object code and store it in 
memory . 

Typing "F666G" will put the user in mini - assembl er mode. 
While in this mode, any line typed in will be interpreted as 
an assembly language instruction, assembled, and stored in 
binary form unless the first character on the command line 
is a "$" . 

If it is, the remainder of the line will be interpreted 
as a normal monitor command, executed , ^and control returned 
to assembler mode. To get out of the assembler mode, reset must be 
pushed. 

, If the first character on the line is blank, the assem- 
bled instruction will be stored starting at the address im- 
mediately following the previously assembled instruction. 
If the first character is nonblank (and not "$"), the line 
is assumed to contain an assembly language instruction pre- 
ceded by the instruction addr'ess (a hex number followed by 
a ":")• In either case, the 'instruction will be retyped 
over the line just entered in disassembler format to provide 
a visual check of what has seen assemble'. The counter that 
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keeps track of where the next instruction will be stored is 
the pseudo PC (Program Counter) and it can be changed by many 
monitor commands (eg.'L', 'T ,' ...)• Therefore, it is advisable 
to use the explicit instruction address mode after every monitor 
command and, of'course, when the Tiny assembler is first 1 
entered . 

Errors (unrecognized mnemonic, illegal format, etc.) are. 
signalled by a "beep" and a carrot ("-") will be printed be- 
neath the last character read from the input line by the mini- 
assembl er. 

The mnemonics and formats accepted by the mini assembler 
are the same as those listed by the 6502 Programmers Manual, 
with the following exceptions and differences: 

1. All imbedded blanks are ignored, except inside 
addresses, 

2. All addresses typed in are assumed to be in hex 
(rather than decimal or symbolic). A preceding "$" 
(indicating hex rather than decimal or symbolic) is 
therefore optional, except that it should not pre- 
cede the instruction address). 

3. Instructions that operate on the accumulator have 
a blank operand field instead of "A". 

4. When entering a branch instruction, following the 
branch mnemonic should be the target of the branch. 
If the destination address is not known at the time 
the instruction is entered, simply enter an address 
that is in the neighborhood, and later re-enter the 
branch instruction with the correct target address. 
NOTE : If a branch target is specified that is out of 
range, the mi ni -assembl er will flag the address as 
being in error. 
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5. The operand field of an instruction can only be 
followed by a comment field, which starts with a semi- 
colon (";")• Obviously, the Tiny assembler ignores 
the field and in fact will type over it when the line 
is typed over in disassembler format. This "feature" 
is included only to be compatible with future up- 
grades including input sources other than the key- 
board. 

6. Any page zero references will generate page zero 
instruction formats if such a mode exists. There 
is no way to force a page zero address to be two 
bytes, even if the address has leading zeroes. 

In general, to specify an addressing type, simply 
enter it as it would be listed in the disassembly. For in- 
formation on the disassembler, see the monitor section. 
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11-18-77 

WOZ 

APPLE-TI 2716 EROM ADAPTATION 
('DO' and ' D8 ' sockets) 

Remove the ' EO ' ROM from its socket. On the top side of the board 
under the ' EO ' socket, cut the ROM pin 18 jumper trace. Then 
reinsert the ROM. This cut will isolate pins 18 of ROMS 'DO' 
and 'D8' from pins 18 of the other ROMS. Reinsert the 'EO' ROM 
when done. 



EO SOCKET 1 



>: 



1A 



\ (Pin 1) 



Cut this trace 



2. On the underside of the APPLE-II board, cut the traces connecting 
pin 20 to 21 of ROMs 'DO' and 'D3' only. 

3 On zhe underside , cut the trace going to pin 18 of ROM ' D8 ' 

near the chip. Scrape solder resist off of approximately i inch 
of the remaining trace not still connected to pin 18. You may 
wish to tin it with solder since it will later be soldered to. 

4. (Underside) Connect pin 18 of ROM ' D8 ' to pin 12 of ROM ' EO ' 

(ground ) 

5. (underside) Connect pin 18 of ROM 'EO' to the trace which 
previously went to pin 18 of ROM 'D8' (and which should be 
pretinned if step 3 was followed). 
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page 2 

6. (underside) Connect pin 21 of ROM 'D8' to pin 21 of ROM 'DO'. 
Then connect both of these to pin 24 of either ROM (Vfjc)« 

7. Note that the TM control function (pin 32 on the APPLE-II 
I/O BUS connectors) will not disable the 2716 EROMs in the 
'DO' and 'D8' ROM slots since pin 21 is a pow/er supply pin 
and not a chip select input on the EROMs. 
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U SING A PPLE -I I COLOR GRAPHICS 
The APPLE-II color graphics hardware will display a 40H 
by 48V. grid, each position, of which may be any one of 16 colors. 
The actual screen data is stored in IK bytes of system memory, 
normally locations $400 to $7FF. (A dual page mode allows the 
user to' alternatively display locations $800 to $BFF). Color 
displays are generated by executing programs which modify the 
'screen memory'. For example, storing zeroes throughout loca- 
tions $400 to $7FF will yield an all-black display while storing 
$33 bytes throughout will yield an all-violet display. A number 
of subroutines are provided in ROM to facilitate useful operations. 

The x-coordinates range from (leftmost) to 39 (rightmost) 
and the y-coordinatcs from (topmost) to 47 (botto irmost ) , If 
the user is in the mixed graphics/text mode with 4 lines of text 
at the bottom of the screen, then the greatest allowable y- 

coordinate is 39. 

The screen memory is arranged such that each displayed 
horizontal line occupies 40 consecutive locations. Additionally, 
even/odd line pairs share the same byte groups. For example, 
both lines and 1 will have their leftmost point stored in 
the same byte, at location $400; and their rightmost point 
stored in the byte at location $427. The least significant 
4 bits correspond to the even line and the most significant 
4 bits to the odd line. The relationship between y-coordinates 
and memory addresses is illustrated on the following page. 
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COLOR GRAPHICS SCREEN MEMORY MAP 



Y-coordinate 



OOabcdef 



BASE ( leftmost ) address 



OOOOOlcd 
~~ GBASH 



eababOOO 

gbabt; 



Data byte 



XXXXYYYY 



odd 

line 

data 



even 
line 
data 



Secondary 



LINE 


BASE address(hex) 


BASE add 


$0,1 


$400 


$800 


$2,3 


$480 


$880 


$4,5 


$500 


$900 


$6,7 


$580 


$980 


$8,9 


$600 


$A00 


$A,B 


$680 


$A80 


$C,D 


$700 


$B00 


$E,F 


$780 


$B80 


$10, 11 


$428 


$828 


$12, 13 


$4A8 


$8A8 


$14, 15 


$528 


$928 


$16, 17 


$5A8 


$9A8 


$18 , 19 


$628 


$A28 


$1A, IB 


$6A8 


$AA8 


$1C, ID 


$728 


$B28 


$1E , IF 


$7A8 


$BA8 


$20, 21 


$450 


$850 


$22,23 


$4D0 


$8D0 


$24,25 


$550 


$950 


$26, 27 


$5D0 


$9D0 


$28,29 


$650 


$A50 


$2A, 2B 


$6D0 


$AD0 


$2C, 2D 


$750 


$B50 


S2E, 2T 


$7D0 


$BD0 
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The APPLE-II color graphics subroutines provided in ROM 
use a few page zero locations for variables and workspace. You 
should 'avoid using these locations for your own program variables. 
It is a good rule not to use page zero locations $20 to $4F 
for any programs since they are used by the monitor and you may 
wish to use the monitor (for example, to debug a program) without 
clobbering your own variables. If you write a program in assembly 
language that you wish to call from BASIC with a CALL command, 
then avoid using page zero locations $20 to $FF for your variables. 

Color Graphics 
Page Zero Variable Allocation 

GBASL $26 

GBASH $27 

H2 $2C 

V2 $2D 

MASK $2E 

COLOR $30 

GBASL and GBASH are used by the color graphics subroutines 
as a pointer to the first (leftmost) byte of the current plot 
line. The (GBASL) ,Y addressing mode of the 6502 is used to 
access any byte of that line. COLOR is a mask byte specifying 
the color for even lines in the 4 least significant bits (0 to 15) 
and for odd lines in the 4 most significant bits. These will 
generally be the same, and always so if the user sets the COLOR 
byte via the SETCOLOR subroutine provided. Of the above variables 
only H2, V2 , and MASK can be clobbered by the monitor, 
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Writing a color graphics program in 6502 assembly language 
generally involves the following procedures. You should be 
familiar with subroutine usage on the 6502. 



1. Set the video mode and scrolling window (refer to 
the section on APPLE-II text features) 

2. Clear the screen with a call to the CLRSCR (48-line 
clear) or CLRTOP (40-line clear) subroutines. If you 
are using the mixed text /graphics feature then call 
CLRTOP . 

3. Set the color using the SETCOLOR subroutine. 

4. Call the PLOT, HLINE , and VLINE subroutines to plot 
points and draw lines. The color setting is not 
affected by these subroutines, 

5. Advanced programmers may wish to study the provided 
subroutines and addressing schemes. When you supply 
x- and y-coordinate data to these subroutines they 
generate BASE address, horizontal index, and even/odd 
mask information. You can write more eff icient . programs 
if you supply this information directly. 
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SETCOL subroutine ( a d dress $F S 64) 

Purpose: To specify one of 16 colors for standard resolution 
plott ing . 

Entry: The least significant 4 A-Rdg bits contain a color code 
(0 to $F). The 4 most significant bits are ignored. 

Exit: The variable COLOR (location $30) and the A-Reg will both 
contain the selected color in both half bytes, for 
example color 3 will result in $33. The carry is cleared. 

Example: (select color 6) 
LDA #$6 

JSR SETCOL ($F864) 

note: When sitting the color to a constant the following sequence 
is preferable. 

LDA #$66 

STA COLOR ($30) 



PLOT sub routine (address $F800) 

Purpose: To plot a square in standard resolution mode using the 
most recently specified color (see SETCOL). Plotting 
always occurs in the primary standard resolution page 
(memory locations $400 to $7FF). 

Entry: The x-coord inate (0 to 39) is in the Y-Reg and the y- 
coordinate (0 to 47) is in the A-Reg.' 

Exit: The A-Reg is clobbered but the Y-Reg is not. The carry is 
cleared. A halfbyte mask ( $F or $FQ) is generated and 
saved in the variable location MASK (location $2E). 

Calls: GBASCALC 

Example: (Plot a square at coordinate ($A,$2C)) 
LDA f$2C Y-coordinate 
LDY #$A X-coordinate 
JSR PLOT (F800) 
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_P L OT1 su brout ine (acldro s s $FSOE) 

Purpose: To plot squares in standard resolution mode with no 
Y-coordinate change from last call to PLOT. Faster 
than PLOT. Uses most recently specified COLOR (see 
SETCOL) 

Entry: X-coordinate in Y-Reg (0 to 39) 

Exit: A-Reg clobbered. Y-Reg and carry unchanged. 

Example: (Plotting two squares - one at (3,7) and one at (9,7)) 

LDY #$3 X-coordinate, 

LDA #$7 Y-coordinate 

JSR PLOT Plot (3,7) 

LDY #$9 New X-coordinate 

JSR PL0T1 Call PLOT1 for fast plot. 



HLINE s ubroutine (addres s $F819) 

Purpose: To draw horizontal lines in standard resolution 

mode. Most recently specified COLOR (see SETCOL) 
is used. 

Entry: The Y-coordinate (0 to 47) is in the A-Reg. The left- 
most X-coordinate (0 to 39) is in the Y-Reg and the 
rightmost X-coordinate (0 to 39) is in the variable 
H2 (location $2C). The rightmost x-coordinate may never 
be smaller than the leftmost. 

Calls: PLOT, PL0T1 

Exit: The Y-Reg will contain the rightmost X-coordinate (same 
as H2 which is unchanged). The A-Reg is clobbered. 
The carry is set . 

Example: Drawing a horizontal line from 3(left X-coord) to 
$1A (right X-coord) at 9 (Y-coord) 

LDY £$3 Left 

LDA ^SIA Right 

STA H2 Save it 

LDA ?$9 Y-coordinate 

JSR HLINE Plot line 
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S C RN subr ou tine (add ress $F8 71) 

Purpose: To sense the color (0 to $F) at a specified screen 
posit i on . 

Entry: The Y-coordinate is in the A-Reg and the X-coordinate 
is in the Y-Reg. 

Exit: The A-Reg contains contents of screen memory at specified 
position. This will be a value from to 15). The Y-Reg 
is unchanged and the 'N' flag is cleared (for unconditional 
branches upon return). 

Calls: GBASCALC 1 

Example: To sense the color at position (5,7) 
LDY #$5 X-coordinate 
LDA i7$7 Y-coordinate 
JSR SCRN Color to A-Reg. 



GBASCALC subroutine (address $F847) 



Purpose : 



To calculate a base address within the primary 
standard resolution screen memory page corresponding 
to a specified Y-coordinate. Once this base address 
is formed in GBASL and GBASH (locations $26 and $27) 
the PLOT routines can access the memory location 
corresponding to any screen position by means of 
(GBASL), Y addressing. 

(Y-coordinate)/2 (0 to $17) is in the A-Reg. Note that 
even/odd Y-coordinate pairs share the same base address) 

The A-Reg is clobbered and the carry is cleared. GBASL 
and GBASH contain the address of the byte corresponding 
to the leftmost screen position of the specified Y-coord. 

Example: To access the byte whose Y-coordinate is $1A and whose 
X-coordinate is 7. 



Entry 



Exit 



LDA F$1A 
LSR 

JSR GBASCALC 



Y-coordinate 

Divide by 2 

Form base address. 



LDY 



X-coordinate 



LDA ( GBASL), Y Access byte 
Note: For an even/odd Y-coord pair, the even-coord 



contained in 
byre and the 



the least 
odd-coord 



significant 
data in the 



data is 

4 bits of the accessed 
most significant 4. 
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The Woz Wonderbook 



DOCUMENT 



Adding Colors 
to 

Apple-II Hi-Res 




This page is not part of the original Wonderbook 
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ADDING COLORS TO APPLE-II HI-RES 




(nullifies warrantee) 


1. Remove the APPLE- 1 1 PC board from its enclosure 


{ a ) 


p n)ri ,,,- tH« ton nnV Gn-rr^wc: conlirl ncr thp Til flStiC tOD X}i-QCQ 




to the metal bottom plate. Six (6) of these are flat-head 




screws around the perimeter of the bottom plate and four (4) 




are round-head screws located at the front lip of the computer. 




All are removed with a pnillips neaa screwarivtji . uul 




rnmnuD tho C r> V On? o cnnnrl no* 1" Vl f=» O O W P T* ^UDOlV OP 11 V 1 QI1 DOSt S . 


(b) 


Lift the plastic top piece from the bottom plate while 




tairincr rarp nnt to Hamagp the ribbon cable connecting the 




keyboard to the PC board. This cable will have to be 




disconnected from one or the other. 


(c) 


Disconnect the power supply from the PC board. 


(d) 


Remove the -8 nut and lockwasher securing the center of the 




PC board. These will not be found on the earlier APPLE-II 




computers . 


(e) 


Carefully disengauge each of 6 nylon posts iron the Jr>L ooara. 




(7 on earlier versions). 


(f ) 


Lift the PC board from the bottom plate. 
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page 2 



2 . Above the board wiring method 



(a) Lift the following IC pins from their sockets. 

A8-1 

AS-6 

A8-13 

A9-1 

A9-2 

A9-9 



(b) Mount a 74LS74 (dual C-D flip-flop) and a 74LS02 (quad NOR 
gate) in the APPLE-II breadboard area (All to A14 region). 



(c) Wire the following circuit (* indicates that wiring is to 
a pin which is out of its socket). 
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— »--c >f J- 

c -. 



<A a -1 

i 



if-' 



7. "3-*- . 



i 

L - 
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The Woz Wonderbook 



DOCUMENT 



Apple-II 
Disassembler Article 
( Apple-II MONITOR ROM ) 
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DISASSEMBLER ARTICLE 
(pertains to APPLE-II MONITOR ROM) 
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FLOATING POINT PACK-AGE 

The mantissa-exponent, or 'floatingpoint', numerical 
representation is widely used by computers to express values 
with a wide dynamic range. With floating point representation, 
the number 7.5 x 10 22 requires no more memory to store than 
the number 75 does. We have allowed for binary floating point 
'arithmetic on the APPLE-II computer by providing a useful 
subroutine package in ROM, which performs the common arithmetic 
functions. Maximum precision is retained by these routines and 
overflow conditions such as 'divide by zero' are trapped for 
the user. The 4-byte floating point number representation is 
compatible with future APPLE products such as floating point 
BASIC. 

A small amount of memory in page zero is dedicated to the 
floating point workspace, including the two floating-point 
accumulators, FP1 and FP2 . After placing operands in these 
accumulators, the user calls subroutines in the ROM which 
perform the desired arithmetic operations, leaving results in 
FP1. Should an overflow condition occur, a jump to location 
$3F5 in RAM is executed, allowing a user routine to take appro- 
priate act ion . 

FLOATING POINT REPRESENTATION 



HI 



LOW 



Exponent Signed Mantissa 
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1 . Ma n ti ssa 

The floating point mantissa is stored in two's complement 

representation with the sign at the most significant bit (MSB) 

position of the high-order mantissa byte. The mantissa provides 

24 bits of precision, including sign, and can represent 24-bit 

integers precisely. Extneding precision is simply a matter of 

adding bytes at the low-order end of the mantissa. 

— 1 28 

Except for magnitudes less than 2~ (which lose precision) 
mantissas are normalized by the floating point routines to retain 
maximum precision. That is, the numbers are adjusted so that the 
upper two high-order mantissa bits are unequal. 

High-order Mantissa Byte 
I 01 .XXXXXX _J Positive mantissa. 
: 10. XXXXXX J Negative mantissa. 

oo.xxxxxxH 

' " .. Unnormalized mantissa, 
■ 11. XXXXXX J exponent = -128. 

2 . Exponent . 

The exponent is a binary scaling factor (power of two) 
which is applied to the mantissa. Ranging from -128 to +127, 
the exponent is stored in standard two's complement representation 
except for the sign bit which is complemented. This representa- 
tion allows direct comparison of exponents since they are stored 
in increasing numberical sequence. The most negative exponent, 
corresponding to the smallest magnitude, -128, is stored as $00 
($ means hexidecimal) and the most positive, +127, is stored as 
$FF (all ones) . 
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+ 2 


10000010 
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10000011 
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-1 
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-3 
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($7D) 



The smallest magnitude which can be represented \s +2 




EXP 



1 



P. . P.. . . . .1 ..J 

high low 
MANTISSA 



The largest positive magnitude which can be represented 



128 
is +2-1. 



-, . ■■ •-, | 1 r 

$7F [ $7F 1 ^ $FF ; $FF 
EXP MANTISSA 
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FLOATING POINT REPRESENTATION EXAMPLES 



J-liJ Ct J- 

umber 


Hpx 
Exponent 


Hex 
Mantissa 


+ 3 


81 


60 


00 


00 


+ 4 


82 


40 


00 


00 


+ 5 


82 


50 


00 


00 


+ 7 


82 


70 


00 


00 


+ 12 


?3 


60 


00 


00 


+ 15 


83 


78 


00 


00 


+17 


84 


44 


00 


00 


+20 


84 


50 


00 


00 


+60 


85 


78 


00 


00 



(1.1 2 x 2 1 ) 
(1.0 2 x 2 2 ) 
(1.01 2 x 2 2 ) 
(1.11 2 x 2 2 ) 
(1.10 2 x 2 3 ) 
(1.111 2 x 2 3 ) 
(l.OOOlg x 2 4 ) 
(1.01 2 x 2 4 ) 
(1.111 2 x 2 5 ) 



- 3 


81 


AO 


00 


00 


- 4 


81 


80 


00 


00 


- 5 


82 


BO 


00 


00 


- 7 


82 


90 


00 


00 


-12 


83 


AO 


00 


00 


-15 


83 


88 


00 


00 


-17 


84 


BC 


00 


00 


-20 


84 


BO 


00 


00 


-60 


85 


88 


00 


00 
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FLOATING POINT SUBROUTINE DESCRIPTIONS 


FCOMPL subroutine (address $F4A4) 




Purpose:, FCOMPL is used to negate floating point 


numbers. 


Entry: A normalized or unnormalized value is in FP1 (floating point 


accumulator 1) . 




Uses: NORM, RTLOG. 




Exit: The value in FP1 is negated and then normalized to retain 

t 


precision. The 3-byte FP1 extension, E, may also be altered 


but FP2 and SIGN are not disturbed. The 6502 A-REG is 


altered and the X-REG is cleared. The Y-REG is not disturbed. 


128 

Caution: Attempting to negate -2 will result in an overflow 


128 

since +2 is not representable , and a jump to location 


S3F5 will be executed, with the following contents in 


FP1. 




FP1 : ' J ' { $80 f £~ J | 
XI Ml " 




Example: Prior to calling FCOMPL, FP1 contains +1= 




FP1: ( $83 | $78 ; J ( 


(+15) 


XI Ml 




After calling FCOMPL as a subroutine, FP1 contains -15. 


FP1: $83 ~? $88 ■[ ] 


(-15) 


XI Ml 
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FA DP subrout ine (address $ F46E) 

Purpose: To add two numbers in floating point form. 

Entry: The two addends are in FP1 and FP2 respectively. For 

maximum precision, both should be normalized. 
Uses: SWPALGN, ADD , NORM, RTLOG. 

Exit: The normalized sum is left in FP1. FP2 contains the addend 
of greatest magnitude. E is altered but SIGN is not. 

i 

The A-REG is altered and the X-REG is cleared. The 

Y-REG is not disturbed. The sum mantissa is truncated to 24 bits 

Caution: Overflow may result if the sum is less than -2 128 

128 

or greater than +2 -1. If so, a jump to location 
$3F5 is executed leaving in XI, and twice the proper 
sum in the mantissa Ml. The sign bit is left in the 
carry, for positive, 1 for negative. 

FP1: 1 [x.YVY... ! 

— J L . _ i 

XI Ml 

(For carry=0, true sum = +X.YYY... x 2 128 .) 
Example: Prior to calling FADD, FP1 contains +12 and FP2 contains 
-5. 

FP1: | $83 $60 j (+12) 

XI Ml 



FP2: $82 $B0 ' (-5) 

X2 " ' M2 



After calling FADD, FP1 contains +7 (FP2 contains +12) 



FP1: $82 . $70 ' • (+7) 

yi ~~ ' mi 



Distributed under the Creative Commons License on page 5 



Page 0086 of 0213 



The Woz Wonderbook -- 1977 -- DigiBarn Computer Museum -- Steve Wozniak, Apple Computer Inc. 



FjaUB_subrout ine ( address $F168 ) 

Purpose: To subtract two floating point numbers. 

Entry: The minuend is in FP1 and the subtrahend is in FP2 , Both 
should be normalized to retain maximum precision prior 
to calling FSUB, 

Uses: FCOMPL, ALGNSWP, FADD, ADD, NORM , RTLOG . 

Exit: The normalized difference is in FP1 with the mantissa trun- 
cated to 24 bits. FP2 holds either the minuend or the negat< 
subtrahend, whichever is of greater magnitude. E is altered 
but SIGN and SCR are not. The A-REG is altered and the 
X-REG is cleared. The Y-REG is not disturbed. 

Cautions: An exit to location $3F5 is taken if the result is 

128 128 
less than -2 or greater than +2 -1, or if the 

128 

subtrahend is -2 
Example: Prior to calling FSUB, FP1 contains +7 (minuend) and 
FP2 contains -5 (subtrahend). 

FP1: | $82 1 | $70 ! j ^ (+7) 

XI Ml ' " 

FP2: I $82 i $B0 '. ~] (-5) 

X2 M2 " 

After calling FSUB, FP1 contains +12 and FP2 contains +7. 

FP1: $83 $60 j j 1 j j (+12) 

XI ~mT~ 
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I'-M IL '.L.- s, j.' l l rout ine ( address _$F48C ) 

Purpose: To multiply floating point numbers. 

Entry: The multiplicand and multiplier must reside in FP1 and 
FP2 respectively. Bothe should be normalized prior to 
calling FMUL to retain maximum precision. 

Uses: MD1 , MD2 , RTLOG1 , ADD, MDEND. 

Exit: The signed normalized floating point product is left in 
FP1. Ml is truncated to contain the 24 most significant 
mantissa bits (including sign). The absolute value of the 
multiplier mantissa (M2) is left in FP2 . E, SIGN and SCR 
are altered. The A- and X-REGs are altered and the Y-REG 
contains $FF upon exit. 
Cautions: An exit to location $3F5 is taken if the product is less 

128 1 98 

than -2 or greater than +2-1. 

Notes: FMUL will run faster if the absolute value of the multi- 
plier mantissa contains fewer ' 1 ' s than the absolute value 
of the multiplicand mantissa. 

Example: Prior to calling FMUL , FP1 contains +12 and FP2 contains 



-5. 
FP1: 



[ $60 \ i 1 (+12) 
XI Ml " ' 



EP2: J $82 j j $B0 ' ; ] : ~j (- 5) 
X2 ~ ' M2 ~~~ " 

After calling FMUL, FP1 contains -60 and FP2 contains +5 

FP1: $85^ j r T88 n | 1 [o j (-60) 

XI Ml " 

FP2: $82 $50 1 \ ' \ (+ 5) 



X2 M2 



Distributed under the Creative Commons License on page 5 



Page 0088 of 0213 



The Woz Wonderbook -- 1977 -- DigiBarn Computer Museum -- Steve Wozniak, Apple Computer Inc. 



£PJA r su broutin e (ad dres s SF4B2) 

Purpo.se: To perform division of floating point numbers. 

Entry: The nqrmalized dividend is in FP2 and the normalized 

divisor is in FP1. 

Exit: The signed normalized floating point quotient is left in 

FP1. The mantissa (Ml) is truncated to 24 bits. The 3-bit 

Ml extension (E) contains the absolute value of the divisor 
i 

mantissa. MD2, SIGN, and SCR are altered. The A- and 
X-REGs are altered and the Y-REG is cleared. 
Uses: MD1, MD2 , MDEND. 

Cautions: An exit to location $3F5 is taken if the quotient is 

]ess than -2 128 or greater than +2 128 -1. 
Notes: MD2 contains the remainder mantissa (equivalent to the 
MOD function). The remainder exponent is the same as 
the quotient exponent, or 1 less if the dividend mantissa 
magnitude is less than the divisor mantissa magnitude. 
Example: Prior to calling FDIV, FP1 contains -60 (dividend) 
and FP2 contains +12 (divisor). 



FP1: j $85 1 



XI Ml ' 



FP2: j $83 "| j $60 







(+12) 



XI Ml 

After calling FMUL , FP1 contains -5 and M2 contains L 

FP1: I $82 J j $BoJ ([ ' [VI (- 5) 

XI Ml 
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FLOAT subroutine (a ddres s $F 4 51) 

Purpose: To convert integers to floating point representation. 

Entry: A signed (two's complement) 2-byte integer is stored in 
Ml (high-order byte) and Ml+1 (low-order byte). Ml+2 
must be cleared by the user prior to entry. 

Uses: N0RM1. 

Exit: The normalized floating point equivalent is left in FP1 . 

E, FP2, SIGN, and SCR are not disturbed. The A-REG contains 
a copy of the high-order mantissa byte upon exit but the 
X- and Y-REGs are not disturbed. The carry is cleared. 

Notes: To float a 1-byte integer, place it in Ml+1 and clear Ml 
as well as Ml+2 prior to calling FLOAT. 

FLOAT takes approximately 3 msec, longer to convert 
zero to floating point form than other arguments. The 
user may check for zero prior to calling FLOAT and increase 
throughput . 



* LOW-ORDER INTEGER BYTE IN A-REG 

* HIGH-ORDER BYTE IN Y-REG 



85 FA X FLOAT STA Ml+1 

84 F9 STY Ml INIT MANT1 . 

AO 00 LDY ,^$0 

84 FB STY Ml+2 

05 D9 ORA Ml CHK BOTH BYTES 

DO 03 BNE TOFLOAT FOR ZERO. 

85 F8 STA XI IF SO, CLR XI 
60 RTS AND RETURN. 

4C 51 F4 TOFLOAT JMP FLOAT ELSE FLOAT INTEGER. 
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(FLOAT c ontinued) 

Example: Float +274 ($0112 hex) 



Calling sequence 



AO 


01 


LDY 


#$01 


A9 


12 


LDA 


#$12 


84 


F9 


STY 


Ml 


85 


FA 


STA 


Ml + 1 


A9 


00 


LDA 


#$00 


85 


F8 


STA 


Ml+2 


20 


51 F4 


JSR 


FLOAT 



HIGH-ORDER INTEGER BYTE 
LOW-ORDER INTEGER BYTE 



Upon returning from FLOAT, FP1 contains the floating 
point representation of +274. 



FP1 : 



$88 



r 



88 j ^ $44 



_J 



i $80 



XI 



J (+274) 



Ml 
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FIX sub routi ne (add res s SF640) 

Purpose: To extract the integer portion of a floating pOint 

number with truncation (ENTIER function). 
Entry: A floating point value is in FPl. It need not be normalized. 
Uses: RTAR. 

Exit: The two-byte signed two's complement representation of the 

integer portion is left in Ml (high-order byte) and Ml+1 

, i 

(low-order byte). The floating point values +24.63 and 
-61.2 are converted to the integers +24 and -61 respectively. 
FPl and E are altered but FP2 , E, SIGN and SCR are not. 
The A- and X-REGs are altered but the Y-REG is not. 
Example: The floating point value +274 is in FPl prior to calling 
FIX. 



FPl: 



$88 
XI 



$44 



$80^j 



(+274) 



After calling FIX, Ml (high-order byte) and Ml+1 
(low-order byte) contain the integer representation 
of +274 ($0112). 



FPl : 



$8E J |_$01^] [ $12 J ~j 



XI 



Ml 



Note: FPl contains an unnormalized representation of 
+274 upon exit. 
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A UXILLI ARY SUBROUTINES. 






aORM subroutine (address $f4bJ j 






Purpose: To normalize the value in FPl, thus 


insuring maximum 


precision . 






Entry: A normalized or unnormalized value is 


in FPl. 


Fxif The value in FPl is .normalized. A zero mantissa will 


exit with X1 = ( 2 -128 exponent ) . If the exponent on exit 


is -128 (X1=0) then the mantissa (Ml) is not 


necessarily 


normalized (with the two high-order mantissa 


bits unequal ) . 


E, FP2, SIGN, and SCR are not disturbed. The A-REG is 


disturbed but the X- and Y-REGs are not. The carry is set. 


Example: FPl contains +12 in unnormalized form (as 


.0011 2 x 2 6 ). 


i " h r i 

FPl ; $86 $0C 1 ; 





(+12) 


XI ' Ml " 






Upon exit from NORM, FPl contains +12 in normalized 


3 

form (as 1 . 1^ x 2 ) . 






FPl | $83 1 , $60 j 1^ 1 


i. . 


(+12) 


"Xl~~ Ml 






NORM 1 subroutine (address $F455 ) 






Purpose: To normalize a floating point value 


in FPl when it 


is known the exponent is not -128 (X1=0) upon entry. 


Entry: An unnormalized number is in FPl. The exponent byte 


should not be for normal use. 






Exit: The- p realized value is in FPl . E , FP2, SIGN, and SCR 


are not disturbed. The A-REG is altered but 


the X- and 


Y-REGs a re not . 
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ADD subroutine (address $F425) 

Purpose: To add the two mantissas (Ml and M2) as 3-byte integers) 
Entry: Two mantissas are in Ml (through Ml + 2) and M2 (-through 
M2+2). They should be aligned, that is with identical 
exponents, for use in the FADD and FSUB subroutines. 
Exit: The 24-bit integer sum is in Ml (high-order byte in Ml, 
lou'-order byte in Ml+2). FP2 , XI, E, SIGN, and SCR are 
net disturbed. The A-REG contains the high-order byte of 
the sum, the X-REG contains $FF, and the Y-REG is not 
altered. The carry is the '25th' sum bit. 
Example: FP1 contains +5 and FP2 contains +7 prior to calling 
ADD. 



FP1 



$82 
XI 



. J l 



550 
Ml 



1 







"1 







(+ 5) 



FP2 



$82 



$70 



oH 







(+ 7) 



Upon exit, Ml contains the overflow value for +12. 
Note that the sign bit is incorrect. This is taken 
-are of with a call to the right shift routine. 

~l f 1 



'PI 



$82 J j $C0 1 











(+12) 
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ABSWAP subroutine (a ddr ess $F437). 

Purpose: To take the absolute value of FP1 and then swap FP1 
with FP2. Note that two sequential calls to ABSWAP 
will take the absolute values of both FP1 and FP2 
in preparation for a multiply or divide. 
Entry: FP1 and FP2 contain floating point values. 
Exit: The absolute value of the original FP1 contents are in 

FP2 and the original FP2 contents are in FP1 . The least 
significant bit of SIGN is complemented if a negation 
takes place (if the original FP1 contents are negative), 
by means of an increment. SClt and E are used. The A-REG 
contains a copy of X2 , the X-liEG is cleared, and the Y-REG 
is not altered. 

HTAR s ubroutine (address $F47D) 

Purpose: To shift Ml right one bit position while incrementing 

XI to compensate for scale. This is roughly the opposii • 
of the NORM subroutine. 

Entry: A normalized or unnormalized floating point value is in 
FP1 . 

Exit: The 6-byte field MANT1 and E is shifted right one bit 

arithmetically and XI is incremented by 1 to retain proper 
scale. The sign bit of MANT1 (MSB of Ml) is unchanged. 
:?2, SIGN, and SCR are not disturbed. The A-REG contains 
the least significant byte of E (E+2), the X-REG is cleared, 
and the Y-REG is not disturbed. 
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RTAR subroutine (continued) 

Caution: If XI increments to (overflows) then an exit to 

location $3F5 is taken, the 'A-REG contains the high-order 
MANT1 byte, Ml, and XI is cleared. FP2, SIGN, SCR, 
and the X- and Y-REG's are not disturbed. 

Uses: RTLOG 

Example: Prior to calling RTAR, FP1 contains the normalize^ 
value -7. 



FP1 


$83 




$A0 














XI 


Ml 







(-7) 



After calling RTAR, FP1 contains the unnormalized 
value -7 (note that precision is lost off the low-order 
end of Ml ) . 



FP1 



$84 
XI 



$D0 











(-7) 



Ml 



Note: Ml sign bit is unchanged. 
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RTLOG subroutine (address $F48Q) 

Purpose: To shift the 6-byte field MANT1 and E one bit to the 
right '(toward the least significant bit). The 6502 
carry bit is shigted into the high-order Ml bit. 
This is useful in correcting binary sura overflows. 
Entry: A normalized or unnormal ized floating point value is in 
FPl. The carry must be cleared or set by the user 
since it is shifted into the sign bit of Ml. 
Exit: Same as RTAR except that the sign bit of Ml is not pre- 
served (it is set to the vlaue of the carry bit on entry) 
Caution: Same as RTAR. 

Example: Prior to calling RTLOG, FPl conatins the normalized 
value -12 and the carry is clear. 



FPl: 



J" $83 





$A0 j 











(-12) 



XI 



Ml 



After calling RTLOG, Ml is shifted one bit to the right 
and the sign bit is clear. XI is incremented by 1. 



FPl: 



$84 




$50 












XI 


Ml 







(+20) 



Note: The bit shifted off the end of MANT1 is rotated 
into the high order bit of the 3-byte extension 
E. The 3-byte E field is also shifted one bit 
to the right. 
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RTLOG1 subroutine (address $F484) 

Prupose: To shift MANT1 and E right one bit without adjusting 
XI. This is used by ten multiply loop. The carry 
is shifted into the sign bit of MANT1. 

Entry: Ml and E contain a 6-byte unsigned field. E is the 
3-byte low-order extension of MANT1 . 

Exit: Same as RTLOG except that XI is not altered and an overflow 

i 

exit cannot occur. 
MD2 subroutine (address $F4E2) 

Purpose: To clear the 3-byte MANT1 field for FMUL and FDIV, 
check for initial result exponent overflow (and 
underflow), and initialize the X-REG to $17 for loop 
count ing . 

Entry: The X-REG is cleared by teh user since it is placed in 
the 3 bytes of MANT1 . The A-REG contains the result 
of an exponent addition (FMUL) or subtraction (FDIV). 
The carry and sign status bits should be set according 
to this addition or subtraction for overflow and under- 
flow determination. 
Exit: The 3 bytes of Ml are cleared (or all set to the contents 
of the X-REG on entry) and the Y-REG is loaded with $17. 
The sign bit of the A-REG is complemented and a copy of 
the A-aEG is stored in XI. FP2 , SIGN, SCR, and the X-REG 
are not disturbed. 
Uses: NORM. 

Caution: Exponent overflow results in an exit to location $3F5, 
Exponent underflow results in an early return from the 
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MD2 su b routine ( cont i nuedj^ 

calling subroutine (FDIV or FMUL) with a floating point 
zero in FP1. Because MD2 pops a return address off 
the stack, it may only be called by another subroutine. 
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1 : 49 P. M. 



10, 



r425 


13 




F426 


A2 


02 


h 423 


: B5 


F9 


-42A 


75 


F5 


r 42C 


95 


F9 


r 42C 


CA 




""■"'F 


10 


(7 


1 


60 




- 432 


06 


F3 


-434 


20 


37 


r 437 


24 


F9 


4.39 


10 


05 


r 43B 


20 


A4 


43E 


E6 


F3 


r 440 


30 




"441 


A 2 


04 


-"443 


94 


FB 


445 


B5 


r/ 


-"447 


B4 


F3 


r 449 


94 


F7 


-44B 


.-.IS" 


!-3 


"44D 


CA 




r 44C 


DO 


F 3 


-450 


60 




■451 


A9 


SE 


"453 • 


'* O 


1- 3 


r 455 


A5 


F9 


r 45 7 


C9 


CO 


•459 


30 


OC 


: 45B- 


C6 


F3 


: 45D: 


06 


(-B 


• r~ '-■ 


26 


FA 



F4 



F4 



/l 
1 

3 

4 

3 

6 

7 

3 

9 

10 

1 1 

12 

13 
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14 


TITLE 


"FLOAT IN 


3 P0IN1 


ROU TINES" 


15 


SIGN 


EPZ 


SF3 


f 


16 


X2 


EPZ 


$F4 




17 


M2 


EPZ 


SF5 




13 


XI 


EPZ 


SF3 


1 


19 


Ml 


EPZ 


5F9 




20 


E 


EPZ 


SFC 


f 

( 


21 


GVLGC 


EQU 


S3F5 






ORG 


SF425 




23 


ADD 


CLC 




CLEAR CARRY. 


24 




LDX 


fc$2 


INDEX FOR 3 -BY Tb ADD. ( 


25 


ADD1 


LDA 


Ml, X 




26 




ADC 


M2, X 


ADD A BY TE OF MAN 1 2 TO MAN Tl.- 


27 




STA 


Ml, X 




23 




DEX 




INDEX TO NEXT MORE STGNIF. BY 1 


29 




BPL 


ADD1 


LOOP UNTIL DONE. 


30 




RTS 




RETURN '■ 


31 


1*1 Li 1 


ASL 


S I GN 


CLEAR LSB OF SIGN. 


32 




jsr 


ABSWAP 


ABS VAL OF Ml. THEN SWAP WITH 


33 


ABSWAP 


BIT 


Ml 


MAN 1 1 NEGATIVE? 


34 




BPL 


ABSWAPl 


NO, SWAP WITH MAN 1 2 AND RETURN 


35 




JSR 


FCOMPL 


YES, COMPLEMENT IT. 


36 




INC 


SIGN 


I NCR SIGN. COMPLEMENT ING LSB. 


37 


ABSWAPl 


SEC 




SET CARRY FOR RETURN TO MUL/OI 


33 


SWAP 


LDX 


#$4 


INDEX FOR 4-BYTE SWAP. 


39 


SWAP1 


STY 


E-l, X 


V 


40 




LDA 


Xl-1, X 


SWAP A BY IE OF EXP/ MAN 1 1 WITH 


41 




LDY 


X2-1, X 


EX P/ MAN f 2 AND LEAVE A COPY Ofy 


& 1 




STY 


Xl-1, X 


MAN 11 IN E (3 BYiES). E+3 IjL 


A 3 




STA 


X2-1, X 




44 




DEX 




ADVANCE INDEX TO NEXT BYTE. 


45 




ENh" 


SWAP1 


LOOP UNTIL DONE. < 


46 




RTS 




RETURN 


A7 


float 


LDA 


*S8E 


INIT EXF1 TO 14, 


43 




STA 


XI 


THEN NORMALIZE TO FLOAT. C 


49 


NCRM1 


LDA 


Ml 


HIGH-ORDER MAN'l 1 BYTE. 


50 




CMP 


#SC0 


UPPER TWO BITS UNEQUAL? 


51 




BM I 


RTS1 


YES. RETURN WITH MAN 1 1 NORMAL. 


52 




DEC 


XI 


DECREMENT EXP1. 


53 




ASL 


Ml +2 




54 




POL 


Ml+1 


SHIFT MANT1 (3 BYTES) LEFT. '< 
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FLCA T I NO PC I N i ROU I" I NES 



49 P. 


M. , 


10/3/1977 








.a 3 : 


26 


F9 


33 




ROL 


Ml 


A3 


F3 


36 


NORM 


LDA 


X 1 




DO 


EL 


57 




BNC 


NORM 1 


^o. . 


60 




(TO 


RTS1 


RTS 






20 


A4 F4 


59 


FSUB 


JGR 


FCOMPL 




20 


7B F4 


60 


SWFALCN 


.JSR 


ALGNSWP 


V6E: 


A3 


F4 
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F3 


93 




STA 


XI, X 


4 AD: 


CA 




94 




DEX 
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COMPARE EXPl WITH EXP2. 
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ADD ALIGNED MANTISSAS. 
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INDEX FOR 6: BYTE RIGHT SHIFT. 
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LOOP UNTIL DONE. 
RETURN. 
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CHECK PROD. EXP AND PREP. FOP f 

CLEAR CARRY FOR FIRST BIT. 
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IF CARRY CLEAR, SKIP PARTIAL PF 
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CROLiS-REh EltNCE: FLOATING POIMl ROUlINES 
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SWEET16 - THE 6502 DREAM MACHINE 



While writing APPLE BASIC for a 6502 microprocessor I 
repeatedly encountered a variant of MURPHY'S LAW. Briefly 
stated, any routine operating on 16-bit data will require at 
least twice the code that it should. Programs making extensive 
use of 16-bit pointers (such as compilers, editors, and assemblers) 
are included in this category. In my case, even the addition 
of a few double-byte instructions to the 6502 would have only 
slightly alleviated the problem. What I really needed was a 
6502/RCA 1800 hybrid - a powerful 8-bit data handler complemented 
by an easy to use processor with an abundance of 16-bit registers 
and excellent pointer capability. My solution was to implement 
a non-existent (meta) 16-bit processor in software, interpreter 
style, which I call SWEET16. 

SWEET16 is based around sixteen 16-bit registers (R0-R15), 
actually 32 memory locations. R0 doubles as the SWEET16 accu- 
mulator (ACC), R15 as the program counter (PC), and R14 as the 
status register. R13 holds compare instruction results and R12 
is the subroutine return stack pointer if SWEET16 subroutines 
are used. All other SWEET16 registers are at the user's unre- 
stricted disposal. 

SWEET16 instructions fall into register and non-register 
categories. The register ops specify one of the sixteen reg- 
isters to be used as either a data clement or a pointer to 
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data in memory depending on the specific instruction. For example, 
INR R5 uses R5 as data and ST @R7 uses R7 as a pointer to data 
in memory. , Except for the SET .instruction , register,ops take 
1 byte of code each. The non-register ops are primarily 6502 
style branches with the second byte specifying a ±127 byte dis- 
placement relative to the address of the following instruction. 
Providing that the prior register op result meets a specified 
branch condition, the displacement is added to SWEET16's PC, 
effecting a branch. 

SWEET16 is intended as a 6502 enhancement package, not a 
stand-alone processor. A 6502 program switches to SWEET16 mode 
with a subroutine call and subsequent code is interpreted as 
SWEET16 instructions. The non-register op RTN returns the user 
program to 6502 mode after restoring the internal register 
contents (A, X, Y, P, and S). The following example illustrates 
how to use SWEET16 . 



300 


B9 


00 


02 


LDA 


IN,Y 


Get a char. 


303 


C9 


CD 




CMP 


"M" 


"M" for move? 


305 


DO 


09 




BNE 


NOMOVE 


No, skip move. 


307 


20 


89 


F6 


JSR 


SW16 


Yes, call SWEET16. 


30A 


41 






MLOOP LD 


@R1 


Rl holds source address 


30B 
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ST 


@R2 


R2 holds dest . address. 


30C 


F3 






DCR 


R3 


Decrement length. 


30D 


07 


FB 




BNZ 


MLOOP 


Loop until done. 


30F 


00 






RTN 




Return to 6502 mode. 


310 


C9 


C5 




NOMOVE CMP 


"E" 


"E" char? 


312 


DO 


13 




BEQ 


EXIT 


Yes, exit. 


314 


C8 






I NY 




No, continue 



NOTE: Registers A, X, Y, P, and S are 
not disturbed by SWEET16. 
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INSTRUCTION DESCRIPTIONS 

The SWEET16 opcode list is short and uncomplicated. 
Excepting relative branch displacements, hand assembly is 
trivial. All register opcodes are formed by combining two 
hex digits, one for the opcode and one to specify a register. 
For example, opcodes 15 and 45 both specify register R5 while 
codes 23, 27 and 29 are all ST ops. Most register ops are 
assigned in complementary pairs to facilitate remembering 
them. Thus LD and ST are opcodes 2n and 3n respectively, while 
LD @ and ST @ are codes 4n and 5n . 

Opcodes to C (hex) are assigned to the thirteen 
non-register ops. Except for RTN (opcode 0), BK (OA), and 
RS (B), the non-register ops are 6502 style relative branches. 
The second byte of a branch instruction contains a +127 byte 
displacement value (in two's complement form) relative to the 
address of the instruction immediately following the branch. 
If a specified branch condition is met by the prior register 
op result, the displacement is added to the PC effecting a 
branch. Except for BR (Branch always) and BS (Branch to Sub- 
routine), the branch opcodes are assigned in complementary 
pairs, rendering them easily remembered for hand coding. For 
example, Branch if Plus and Branch if Minus are opcodes 4 and 
5 while Branch if Zero and Branch if NonZero are opcodes 6 and 7. 
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REGISTER OPS 



SET Rn, Constant 



In low j . high 
constant 



(Set) 



The 2-byte constant is loaded into Rn (n - to F, hex) 
d branch conditions set accordingly. The carry is 



an 

cleared. 
E^iamjole 
15 34 AO 



SET 



R5.A034 R5 now contains A034 



LD Rn 



[_2n~ (L ° ad) 
The ACC (RO) is loaded from Rn and branch conditions 
set according to the data transferred. The carry is 
reared and the contents of Rn are not disturbed. 
Example 

- c q4 ao SET R5, A034 

^ 34 A LD R5 ACC now contains A034 



ST Rn 



3n 



ACC is stored into Rn an 



o r di„g to the data transferred. The carry i. beared 



The 

acc 

and the ACC contents are not disturbed. 
Example 



(Store) 
d branch conditions set 



25 

36 



LD R5 
ST R6 



Copy the contents 
of R5 to R6. 
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i ' A ~ '■ (Load indirect) 

LD [__^ n 

The low-order ACC b^te is loaded from the memory location 
whose address resides in Rn and the high-order ACC byte is 
cleared. Branch conditions reflect the final ACC con- 
tents which will always be positive and never minus 1. 
The carry is cleared. After the transfer, Rn is incre- 
mented by 1. 
Example 

15 34 AO SET R5.A034 

m ®R5 ACC is loaded from 

45 @R5 Memory location A034 

and R5 is incremented 

to A035. 



ST @Rn 



T - n "j (Store indirect) 

The low-order ACC by'tTls stored into the memory location 
wnoS e address resides in Rn . Branch conditions reflect 
the 2-byte ACC contents. The carry is cleared. After 
the transfer, Rn is incremented by 1. 
Example 

15 34 A0 SET R5, A034 Load pointers R5 and R6 

16 22 9 o SET R6, 9022 with A034 and 9022. 

LD @R5 Move a byte from location 

45 uu ~ A034 to location 9022. 

ST @R6 Both pointers are 

incremented. 
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LDD ruRn | 6n (Load double-byte indirect) 

The low order ACC byte is loaded from the memory location 
whose address resides in Rn and Rn is then incremented 
by 1. The high order ACC byte is loaded from the memory 
location whose address resides in the (incremented) Rn 
and Rn is again incremented by 1. Branch conditions 
reflect the final ACC contents. The carry is cleared. 
E xample 

15 34 AO SET R5, A034 

* LDD @R5 The low-order ACC byte 

DO is loaded from location 

A034, the high-order byte 
from location A035. R5 is 
incremented to A036. 



STD @Rn 



i 7n i (Store double-byte indirect) 

The low-order ACC byte is stored into the memory location 
whose address resides in Rn and Rn is then incremented 
by 1. The high-order ACC byte is stored into the memory 
location whose address resides in (the incremented) Rn 
and Rn is again incremented by 1. Branch conditions 
reflect the ACC contents which are not disturbed. The 
carry is cleared. 
Example 

15 34 ao SET R5, A034 Load pointers R5 and R6 

16 22 go SET R6, 9022 with A034 and 9022. Move 
65 LDD @R5 double byte from locations 
?6 STD @R6 A034 and A035 to locations 

9022 and 9023. Both point- 
ers are incremented by 2. 
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POP aRn j 8n (Pop indirect) 

The low order ACC byte is loaded from the memory location 
whose address resides in Rn after Rn is decremented by 1 
and the high order ACC byte is cleared. Branch conditions 
reflect the final 2-byte ACC contents which will always be 
positive and never minus 1. The carry is cleared. Because 

Rn is decremented prior to loading the ACC, single byte 

i 

stacks may be implemented with the ST @Rn and POP @Rn 

ops (Rn is the stack pointer). 

Example 

15 34 AO SET R5, A034 Init stack pointer. 

10 04 00 SET R0, 4 Load 4 into ACC. 

35 ST @R5 Push 4 onto stack. 

10 05 00 SET R0, 5 Load 5 into ACC. 

35 ST @R5 Push 5 onto stack, 

10 06 00 SET R0, 6 Load 6 into ACC. 

» 

35 ST @R5 Push 6 onto stack. 

85 POP @R5 Pop 6 off stack into ACC. 

85 POP @R5 Pop 5 off stack. 

85 POP @R5 Pop 4 off stack. 
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r " — * 

STP cIRn ; 9n • (STORE POP indirect) 

i 

The low order ACC byte is stored into the memory location 
whose address resides in Rn after Rn is decremented by 1. 
Then the high-order ACC byte is stored into the memory 
location whose address resides in Rn after Rn is again 
decremented by 1. Branch conditions will reflect the 
2-byte ACC contents which are not modified. STP @Rn 
and FOP @Rn are used together to move data blocks 
beginning at the greatest address and working down. 
Additionally, single-byte stacks may be implemented 
with the STP @Rn and LDA @Rn ops. 



Example 

14 34 AO SET R4, A034 Init pointers. 

15 22 90 SET R5, 9022 

84 POP @R4 Move byte from A033 

95 STP @R5 to 9021. 

84 POP @R4 Move byte from A032 

95 STP @R5 to 9020. 
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ADD Rn 



! An 



(Add) 



The contents of Rn are added to the contents of the ACC 
(RO) and the low-order 16 bits of the sum restored in 
ACC. The 17th sum bit becomes the carry and other branch 
conditions reflect the final ACC contents. 
Example 



10 34 76 



SET RO i 7634 Init RO (ACC) 



11 27 42 



SET Rl, 4 227 



and Rl. 



Al 



AO 



ADD Rl 



ADD RO 



Add Rl (sum = B85B, 
carry clear) 

Double ACC (RO) to 70B6 
with carry set. 
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SUB Rn Bn (Subtract) 

The contents of Rn are subtracted from the ACC contents 
by performing a two's complement addition: 

ACC ACC + Rn + 1 

The low order 16 bits of the subtraction are restored 

i 

in the ACC. The 17th sum bit becomes the carry and other 

branch conditions reflect the final ACC contents. If 

the 16-bit unsigned ACC contents are greater than or 

equal to the 16-bit unsigned Rn contents then the 

carry is set, otherwise it is cleared. Rn is not disturbed. 

Example 

10 34 76 SET RO , 7634 Init RO (ACC) 

11 27 42 SET Rl, 4227 and Rl . 

Al SUB Rl Subtract Rl (diff = 

340D with carry set) 

AO SUB RO Clears ACC (RO) 
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POPD @Rn ! Cn | (POP Double-byte indirect) 

Rn is decremented by 1 and the high-order ACC byte is 
loaded from the memory location whose address now reside's 
in Rn. Then Rn is again decremented by 1 and the low-order 
ACC byte is loaded from the corresponding memory location. 
Branch conditions reflect the final ACC contents. The 
carry is cleared. Because Rn is decremented prior to 
loading each of the ACC halves, double-byte stacks 
may be implemented with the STD @Rn and POPD @Rn ops 
(Rn is the stack pointer). 
Example 

15 34 AO SET R5, A034 Init stack pointer. 

10 12 AA SET R0, AA12 Load AA12 into ACC. 

75 STD @R5 Push AA12 onto stack. 

10 34 BB SET R0, BB34 Load BB34 into ACC. 

75 STD @R5 Push BB34 onto stack. 

10 56 CC SET R0, CC56 Load CC56 into ACC. 

C5 POPD @R5 Pop CC56 off stack. 

C5 POPD @R5 Pop BB34 off stack. 

C5 POPD @R5 Pop AA12 off stack. 
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CPR Rn | Dn ' (Compare) 

The ACC (RO) contents are compared to Rn by performing 
the 16-bit binary subtraction ACC-Rn and storing the low 
order 16 difference bits in R13 for subsequent' branch 
tests. If the 16-bit unsigned ACC contents are greater 
than or equal to the 16-bit unsigned Rn contents then 
the carry is set, otherwise it is cleared. No other 
registers, including ACC and Rn, are disturbed. 
Example 

15 34 AO SET R5 , A034 Pointer to memory. 

16 BF AO SET R6 , AOBF Limit address. 
10 00 00 LOOP SET R0, Zero data. 

75 STD @R5 Clear 2 Iocs, incr R5 by 2 

25 LD R5 Compare pointer R5 

D6 CPR R6 to limit R6 . 

02 F8 BNC LOOP Loop if carry clear. 
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i 

INR Rn ( En ! (Increment) 

The contents of Rn are incremented by 1. The carry is 
cleared and other branch conditions reflect the incre- 
mented value. 
Example 

15 34 AO SET R5, A034 Init R5 (pointer) 

10 00 00 SET RO, Zero to R0 . 

55 ST @R5 ciears loc A034 and incrs 

R5 to A035. 

E5 INR R5 Incr R5 to A036 

55 ST @R5 Clears loc A036 (not A035) 



DCR Rn i Fn 



(Decrement ) 



The contents of Rn are decremented by 1. The carry is 
cleared and other branch conditions reflect the decre- 
mented value. 

Example (Clear 9 bytes beginning at loc A034) 

15 34 AO SET R5, A034 Init pointer. 

14 09 00 SET R4, 9 Init count. 

10 00 00 SET R0, Zero ACC. 

55 LOOP ST @R5 Clear a mem byte. 

F4 DCR R4 Deer, count. 

07 FC BNZ LOOP Loop until zero. 
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NON-REGISTER INSTRUCTIONS 



RTN ; 00 i (Return to 6502 mode) 

Control is returned to the 6502 and program execution 
continues at the location immediately following the RTN 
instruction. The 6502 registers and status conditions 
are restored to their original contents (prior entering 
SWEET16 mode) 

BR ea 0l\ [d_ (Branch Always) 

An effective address (ea) is calculated by adding the 
signed displacement byte (d) to the PC. The PC contains 
the address of the instruction immediately following 
the BR, or the address of the BR op plus 2. The 
displacement is a signed twos complement value from 
-128 to +127. Branch conditions are not changed. Note 
that effective address calculation is identical to that 
for 6502 relative branches. The hex add and subtract 
features of the APPLE-II monitor may be used to calculate 
displacements . 

d = $80 ea = PC + 2 - 128 
d = $81 ea = PC + 2 - 127 

d = $FF ea = PC + 2 - 1 
d = $00 ea = PC + 2 + 
d = $01 ea = PC + 2 + 1 

d = $7E ea = PC + 2 + 126 
d = $7F ea = PC + 2 + 127 

Exampl e 

$300: 01 50 BR $352 
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BNC ea | 02 I d (Branch if No Carry) 

A branch to the effective address is taken only if the 

carry is clear, otherwise execution resumes as normal 

with the next instruction. Branch conditions are not 
changed . 



— I | -i 

BC ea 03 ' d (Branch if Carry set) 

A branch is effected only if the carry is set:. Branch 
conditions are not changed. 



BP ea 



04 ! d 



(Branch if Plus) 



A branch is effected only if the prior 'result' (or most 
recently transferred data) was positive. Branch con- 
ditions are not changed. 

Example (Clear mem from loc . A034 to A03F) 



15 34 AO 
14 3F AO 
10 00 00 

55 
24 
D5 

04 F8 



SET R5, A034 Init pointer. 

SET R4, A03F Init limit. 

LOOP SET R0, 

ST @R5 Clear mem byte, incr R5, 

LD R4 Compare limit to 

CPR R5 pointer. 



BP 



LOOP 



Loop until done. 



BM ea 05 d i (Branch if Minus) 

A branch is effected only if the prior 'result' was 
minus (negative, MSB = 1). Branch conditions are not 
changed . 
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• 1 , — -i 

BZ ea . 06 j ; d (Branch if Zero) 

A branch is effected only if the prior 'result' was zero. 

Branch conditions are not changed. 



(Branch if NonZero) 



BNZ ea [ 07J j d 

A branch is effected only if the prior 'result' was 
non-zero. Branch conditions are not changed. 



BM1 ea 



08! 



d ~~ | (Branch if Minus 1) 
A branch is effected only if the prior 'result' was 
minus 1 ( $FFFF hex). Branch conditions are not changed, 



BNM1 ea 09 ■ d ; (Branch if Not Minus 1) 

A branch is effected only if the prior 'result' was not 
minus 1 ( $FFFF hex). Branch conditions are not changed. 



BRK 



OA I (Break) 



A 6502 BRK (break) instruction is executed. SWEET16 

may be reentered nondestructively at SW16D after correcting 

the stack pointer to its value prior executing the BRK. 
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RS 



OB ' (Return from SWEET16 Subroutine) 

RS terminates execution of a SWEET16 subroutine and 
returns to the SWEET16 .calling program which s resumes 
execution (in SWEET16 mode). R12, which is the SWEET16 
subroutine return stack pointer, is decremented twice. 
Branch conditions are not changed. 



BS ea 



OC 



Hi | (Branch to SWEET16 Subroutine) 
A branch to the effective address (PC + 2 + d) is taken 
and execution is resumed in SWEET16 mode. The current 
PC is pushed onto a ' SWEET16 subroutine return address' 
stack whose pointer is R12, and R12 is incremented by 
2. The carry is cleared and branch conditions set to 
indicate the current ACC contents. 

Example (Calling a 'memory move' subroutine to move 
" * "~ A034-A03B to 3000-3007) 



300 : 


15 


34 


AO 


SET 


R5, A034 


Init pointer 1. 


303: 


14 


3B 


AO 


SET 


R4, A03B 


Init limit 1. 


306 : 


16 


00 


30 


SET 


R6, 3000 


Init pointer 2. 


309: 


0C 


15 




BS 


MOVE 


Call move subroutine 


320: 


45 






MOVE LD 


@R5 


Move one 


321 : 


56 






ST 


@R6 


byte . 


322 : 


24 






LD 


R4 




323 : 


D4 






CPR 


R5 


Test if done. 


324 : 


04 


FA 




BP 


MOVE 


Return . 


326 : 


0B 






RS 
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THEORY OF OPERATION 

SWEET 16 execution mode begins with a subroutine call to 
SW16. The user must insure that the 6502 is in hex mode upon 
entry. All 6502 registers are saved at this time, to be re- 
stored when a SWEET16 RTN instruction returns control to the 
6502. If you can tolerate indefinite 6502 register contents 
upon exit, approximately 30 usee may be saved by entering at 
SW16 + 3. Because this might cause an inadvertant switch from 
hex to decimal mode, it is advisable to enter at SW16 the first 
time through. 

After saving the 6502 registers, SWEET16 initializes 
its PC (R15) with the subroutine return address off the 6502 
stack. SWEET16's PC points to the location preceding the next 
instruction to be executed. Following the subroutine call 
are i- t 2-, and 3-byte SWEET16 instructions, stored in ascending 
memory locations like 6502 instructions. The main loop at SW16B 
repeatedly calls the 'execute instruction' routine at SW16C 
which examines one opcode for type and branches to the appro- 
priate subroutine to execute it. 

Subroutine SW16C increments the PC (R15) and fetches the 
next opcode which is either a register op of the form OP REG 
with OP between 1 and 15 or a non-register op of the form OP 
with OP between and 13. Assuming a register op, the register 
specification is doubled to account for the 2-byte SWEET16 
registers and placed in the X-Reg for indexing. Then the 
instruction type is determined. Register ops place the doubled 
register specification in the high order byte of R14 indicating 
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the 'prior result register' to subsequent branch instructions. 
Non-register ops treat the register specification (right-hand 
half-byte) as their opcode, increment the SWEET16 PC to point - 
at the displacement byte of branch instructions, load the A-Reg 
with the 'prior result register' index for branch condition 
testing, and clear the Y-Reg. 

WHEN IS AN RTS REALLY A JSR? 
Each instruction type has a corresponding subroutine. 
The subroutine entry points are stored in a table which is 
directly indexed into by the opcode. By assigning all the 
entries to a common page only a single byte of address need 
be stored per routine. The 6502 indirect jump might have been 
used as follows to transfer control to the appropriate subroutine. 

LDA #ADRH High-order address byte. 

STA IND+1 

LDA OPTBL.X Low-order byte. 
STA IND 
JMP (IND) 

To save code the subroutine entry address (minusll) 
is pushed onto the stack, high-order byte first. A 6502 RTS 
(ReTurn from Subroutine) is used to pop the address off the 
stack and into the 6502 PC (after incrementing by 1). The 
net result is that the desired subroutine is reached by executing 
a subroutine return instruction! 
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OPCODE SUBROUTINES 
The lister op routines m a*e use of the *™ ' «" 
pag e ^ea bJ X. anu.uae.ea b, X inject, aaa.ess- 

=- - — - — *r::r:r:^ 

-. + • of most register ops is ieit 
The 'result of most instructions 
+ ' 9 „d can be sensed by subsequent brancn 

' „ rhts speculation is chan.ea to inaicate HO 

;:i - SUB - - - - - 

9 to account for the 2-byte 
re suit renter' iuaex tr^es 2 to 

SWEET16 renters aua thus the LSB is zero. 

CPB lnsl „c tl a»s S e„erate carries, then this is 

mented, setting the LSB. nickinE up 

^ Q r>+c: the PC twice, picKing 
The SET instruction = * ^ 

■ - »~ " SPeCi ; ie I! 8 preoeaes the hi g h-orae, 

convention, the loa-order aata byte p 

Host SWESTiS uonre g ister ops are rotative .ranches 
The ecrresponatn. subroutines aeter.ine whether or not the 
, prlor resuif „eets the specif branch c-t- ^ ' 
u P pdate th . S « ET16 PC b, aaatn. the atsptac^ent va.ue <-« 
to +127 bytes). 
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The RTN op restores the 6502 register contents, pops the 
subroutine return stack and jumps indirect through the SWEET16 
PC. This transfers, control to the 6502 t at the instruction im- 
mediately following the RTN instruction. 

The BK op actually executes a 6502 break instruction ( BRK ) , 
transferring control to the interrupt handler. 

Any number of subroutine levels may be implemented within 
SWEET16 code via the BS (Branch to Subroutine) and RS (Return 
from Subroutine) instructions. The user must initialize and 
otherwise not disturb R12 if the SWEET16 subroutine capability 
is used since it is utilized as the automatic subroutine return 
stack pointer. 

MEMORY ALLOCATION 
The only storage that must be allocated for SWEET16 variables 
are 32 consecutive locations in page zero for the SWEET16 regis- 
ters, four locations to save the 6502 register contents, and 
a few levels of the 6502 subroutine return address stack. If 
you don't need to preserve the 6502 register contents, delete 
the SAVE and RESTORE subroutines and the corresponding subroutine 
calls. This will free the four page zero locations ASAV, XSAV, 
YSAV, and PSAV. 

USER MODIFICATIONS 
You may wish to add some of your own instructions to this 
implementation of SWEET 16 . If you use the unassigned opcodes 
$0E and $0F, remember that SWEET 16 treats these as 2-byte instruc- 
tions. You may wish to handle the break instruction as a SWEET16 
call, saving two bytes of code each time you transfer into SWEET 16 
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. , qwFFTie BK (Break) op as a 

mode. Or you may wish to use the S\,ttilb a* i 

> , v. at ^ ?nu can perform absolute 

' CHAROUT ' call in the interrupt handler. You can p 

jumps within SWEET16 by loading teh ACC (RO) with the address 

vou wish to Jump to (minus 1) and executing a ST H15 instruction. 
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PAGE : 



P M- 



-A3?: 
-63C: 
-6CD: 
I -ASF: 
r O: 
I" 692: 
I- 695: 
F6V3: 
F69A 
F69C: 
F6*E: 
f 6A0: 
h 6A1: 
K6A3: 
F6A5: 
F6A7: 
F6AS- 
F6A9 
i-6AA 
F6AC 
F6AE 
F6B0 
F6B1 
F6B2 
F6B3 
F6E4 
P6B7: 
F6B3 
' 6B9 
6BB 
I 6BD 



10/3/197/ 
1 

3 
4 
5 
6 
7 

3 
9 

10 

11 

12 

13 

14 

15 

16 

17 

13 

19 

20 

21 

■yy 

23 
FF 24 



20 4A 
63 



55 


IE 


26 


60 




27 


35 


IF 


23 


20 


93 F6 


29 


4C 


92 F6 


30 


E6 


IE 


31 


DO 


02 




E6 


IF 


33 


A9 


F7 


34 


43 




35 


AO 


00 


36 


Bl 


IE 


37 


29 


OF 


~*o 


OA 




39 


AA 




40 


4A 




41 


51 


IE 


42 


FO 


OB 


43 


36 


ID 


44 



*********************** 



4A 
4A 
4A 

A3 

B9 El 

40 

60 

E6 IE 
DO 02 
E6 IF 



F6 



IRPRETEK * 
* 

1977 * 

lER INC * 
* 

RESERVED * 
* 

[ AK * 



1 



•SULET 1 6 I N I ERF'PE TEK' 



* APPLE- 1 I F" 
» MACHINE INTEF 
* 

* COPYRIGHT 

* APPLE COttPUl 

* ALL RIGHTS RE 
* 

» 9, WOZNIi 

* 

* 

TITLE 
ROL 
ROM 
R14H 
R15L 
R15H 
316PAG 
SAVE 
RESTORE 



SW16 

3W16B 
SW16C 

SW 1 6D 



45 
46 
47 
43 
49 
50 
51 

53 
54 



TGBR 



EPZ 


SO 


EPZ 


$1 


EPZ 


*1D 


EPZ 


S1E 


EPZ 


S1F 


EQU 


*F7 


EQU 


SFF4A 


EQU 


*FF3F 


ORG 


SF639 


.JSR 


SAVE 


PLA 




STA 


R15L 


PLA 




STA 


R15H 



JSR 

JMP 

INC 

ENE 

INC 

LDA 

PHA 

LDY 

LDA 

AND 

ASL 

TAX 

LSR 

EGR 



3W16C 

SW16B 

R15L 

SW16D 

R15H 

fcS 1 6 PAG 



ft«0 

(R11 

tt$F 

A 



;d. y 



A 

(R15L) 



BEQ 


TGBR 


STX 


R14M 


LSR 


A 


LSR 


A 


LSR 


A 


TAY 




LDA 


GPTBL- 


PHA 




RTS 




INC 


R15L 


BNE 


TGBR2 


INC 


R15H 



PRESERVE 6502 REG CONTENTS 

IN IT SWLET16 PC 

FROM RETURN 

ADDRESS 
IN TERPRET ANU EX ECU I E 
GNU SWEET 16 INSTK. 

I NCR SWEET 16 PC FOR FE lCH 

PUSH ON STACK FOR RTS 
FEU":H INSTR 

n %k REG SPECIFICATION 
SSuSLE FOR 2 -BY. E BED'S 
TO X-REG FOR INUEXINo 

NfiW HAVE OPCODE 

IF ZERO THEN NGN -REb OP 

INDICATE- FR I OR RESULT REG' 

0PC0DE*2 TO LSE-S 

TO Y-REG FOR INDEXING 
LOW-ORDER ADR BYTE 
ONlO STACK. 
GOTO REG-OP RuUriNfc 

I NCR PC 
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•iU!t£e.Ti6 IN i £Kr F.ETER 
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APPLE-1I MACHINE CODE RELOCATION PROGRAM 

Quite frequently I have encountered situations calling for 
relocation of machine language (not BASIC) programs on my 6502- 
based APPLE-II computer. Relocation means that the new version must 
run properly from different memory locations than the original. 
Because of the relative branch instruction, certain small 6502 

! i 

programs need simply be moved and not altered. Others require only 
minor hand modification, which is simplified on the APPLE-II by the 
built-in disassembler which pinpoints absolute memory reference 
instructions such as JMPs and JSRs . However, most of the situations 
which I have encountered involved rather lengthy programs containing 
multiple data segments interspersed with code. For example, I once 
spent over an hour to hand-relocate the SK byte APPLE8I I monitor and 
BASIC to run from RAM addresses and at least one error probably 
went by undetected. That relocation can now be accomplished in a 
couple minutes using the relocation program described herein. 
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The following situations call for program relocation: 


(1) 


Two programs which were written to run in identical 




m ,~ + ™™ ^<=irle and run in memory concurrently, 
locations must now resiae dim * 


(2) 


A program currently runs from ROM. In order to modify 




its operation experimentally, a version must be genera- 




ted which runs from RAM (different addresses). 


(3) 


A program currently running in RAM must be converted to 




run from EPROM or ROM addresses. 


(4) 


A program currently running on a 16K machine must be 




relocated in order to run on a 4K machine. Furthermore, 




the relocation may have to be performed on the smaller 




machine . 


(5) 


Due to memory mapping differences, a program running on 




an APPLE-I (or other 6502 based) computer falls into 




unusable address space. on an APPLE-II (or other) computer. 


(6) 


Due to operating system variable assignment differences 




either the page-zero or non-page-zero variable allocation 




for a specific program may have to be modified when moving 




the program from one make of computer to another. 


(7) 


A program exists as several chunks strewn about memory 




,nich must be combined in a single, contiguous block. 


Distributed under the Creative Commons License on page 5 1 Page 01 41 of 021 3 a 



The Woz Wonderbook -- 1977 -- DigiBarn Computer Museum -- Steve Wozniak, Apple Computer Inc. 



page 3 



(8) A program has outgrown the available memory space and 
must be relocated to a larger 'free' space. 

(9) A program insertion or deletion requires a chunk of the 
program to move a few bytes up or down. 

(10) On a whim, the user wishes to move a program. 
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PROGRAM MODEL 

It is easy to visualize relocation as taking a program which 
resides and runs in a 'source block' of memory and creating a 
modified version in a 'destination block' which runs properly. 
This model dictates that the relocation must be performed in an 
environment in which the program may in fact Reside in both blocks. 
In many cases, the relocation is being performed because this is 
impossible. For example, a program written to begin at location 
$400 on an APPLE-I ($ stands for hex) falls in the APPLE-II screen 
memory range. It must be loaded elsewhere on the APPLE-II prior 
to relocation . 

A more versatile program model is as follows. A program or 
section of a program runs in a memory range termed the 'source block' 
and resides in a range termed the 'source segments'. Thus a program 
written to run at location $400 may reside at location $800. The 
program is to be relocated so that it will run in a range termed 
the 'destination block' although it will reside in a range termed 
'destination segments' (not necessarily the same). Thus a program 
may be relocated such that it will run from location $D000 (a ROM 
address) yet reside beginning at location $C00 prior to being saved 
on tape or used to burn EPROMs (obviously, the relocated program 
cannot immediately reside at locations reserved for ROM). In some 
cases the source and destination segments may overlap. 
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BLOCKS AND SEGMENTS EXAMPLE 



Location during 
Rel ocat ion 



$800 



$B87 



$CO0 



SF87 



Program runs from 
location $400 . 
on APPLE- I 



Relocated version 
runs from 
location $D000 
on APPLE-II 



Relocation 



SOURCE BLOCK: $400-$787 DEST BLOCK: $DOOO-$D387 

SOURCE SEGMENTS: S800-SB87 DEST SEGMENTS: $C00-$F87 
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THE RELOCATION ALGORITHM 

(1) Set SOURCE PTR to beginning of source segment and DEST PTR 
to beginning of destination segment. 

(2) Copy 3 bytes from source segment (using SOURCE PTR) to temp 
INST area. 

(3) Determine instruciton length from opcode (1, 2, or 3 byte). 

(4) If two byte instruction with non-zero-page addressing mode 
(immediate or relative) then go to (7). 

(5) If two byte instruction then clear 3rd byte so address field 
is 0-255 (zero page). 

(6) If address field (2nd and 3rd bytes of INST area) falls within 
source block , then substitute 

ADR - SOURCE BLOCK BEGIN + DEST BLOCK BEGIN 

(7) Move 'length' bytes from INST area to dest segment (using 
DEST PTR). Update SOURCE and DEST PTRs by length. 

(8) If SOURCE PTR is less than or equal to SOURCE SEGMENT END 
then goto (2), else done. 
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DATA SEGMENTS 

The problem with relocating a large program all at once is that 
data (tables, text, etc.) may be interspersed throughout the code. 
Thus data may be 'relocated' as though it were code or might cause 
some code not to be relocated due to boundary uncertainty introduced 
when the data takes on the multi-byte attribute of code. This problem 
is circumvented by considering the 'source segments' and 'destination 
segments' sections to contain both code and data segments. 

CODE AND DATA SEGMENTS EXAMPLE 



$800 — 


>~ 


Code Segment 




$800-$892 






Data Segment 






$893-$992 






Code Segment 






$993-$ABF 






Data Segment 






$AC0-$ACF 






Code Segment 


$B87 — 




$ACF-$B87 



The source code segments are relocated to the 'destination segments' 
area and the source dat a segments are moved . Note that several commands 
will be necessary to accomplish the complete relocation. 
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USAGE 



1. Load RELOC by hand or off tape into memory locations $3A6-$3FA. 
Note that locations $3FB-$3FF are not disturbed by tape load 
versions to insure that the APPLE-II interrupt vectors are not 
clobbered. The monitor user function Y c (Control-Y) will now 
call RELOC as a subroutine at location $3F8. 

2. Load the source program into the 'source segments' area of memory 
if it is not already there. Note that this need not be where 
the program normally runs. 

3. Specify the source and destination block parameters, remembering 
that the blocks are the locations that the program normally 

runs from, not the locations occupied by the source and destinati 
segments during the relocation. If only a portion of a program 
is to be relocated then that portion alone is specified as the 
block . 

* DEST BLOCK BEG < SOURCE BLOCK BEG . END Y C * 

Note that the syntax of this command closely resembles that of 
the MONITOR 'MOVE' command. The initial '*' is generated by 
the MONITOR, not typed by the user. 
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Move all data segments and relocate all code segments in sequential 
(increasing address) order. 

First Segment (if CODE) 

* DEST SEGMENT BEG < SOURCE SEGMENT BEG . END Y C 

First Segment (if DATA) 

* DEST SEGMENT BEG < SOURCE SEGMENT BEG . END M 

Subsequent segments (if CODE) 

* . SOURCE SEGMENT END Y c (Relocation) 

S ubsequent segments (if DATA) 

* . SOURCE SEGMENT END M (Move) 

Note that it is wise to prepare a list of segments (code and data) 
prior to relocation. 

If the relocation is performed 'in place' (SOURCE and DEST 
SEGMENTS reside in identical locations) then the SOURCE SEGMENT 
BEG parameter may be ommitted from the first segment relocate 
( or move ) . 
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EXAMPLES 



1. Straightforward Relocation 



Program A resides and runs in locations $800-$97F. The relo- 
cated version will reside and run in locations $A00-$B7F. 



SOURCE SEGMENTS 



.$800 — 



$97F- 



CODE 
$800-$88F 



DATA 
$890-$8AF 



CODE 
$8B0-$90F 



DATA 
$910-$93F 



CODE 
$940-$97F 



SOURCE BLOCK S800-$97F 
SOURCE SEGMENTS $S00-$97F 



DEST SEGMENTS 



$A00- 



$B7F 



CODE 
$A00-$A8F 



DATA 
$A90-$AAF 



CODE 
$AB0-$B0F 



DATA 
$B10-$B3F 



CODE 
$B40-$B7F 



DEST BLOCK $A00-$B7F 
DEST SEGMENTS $A00-$B7F 



(a) Load RELOC 

(b) Define blocks 

* A00 < 800 . 97F Y C * 

(c) Relocate first segment (code). 

* A00 < 800 . 88F Y C 
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(d) Move and relocate subsequent segments in order. 

* . 8AF M (data) 

* . 90F Y C (code) 

* . 93F M (data) 

* . 97F Y c (code) 



Note that step (d) illustrates abbreviated versions of 
the following commands: 



* 


A90 


< 


890 


8AF 


M 


(data) 


* 


ABO 


< 


8B0 


90F 


Y c 


(code) 


* 


BIO 


< 


910 


93F 


M 


(data) 


* 


B40 


< 


940 


97F 


yC 


( code ) 
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Index into block 

Assume that the program of example 1 uses an indexed reference 
into the data segment at $890 as follows: 

LDA 7B0,X 

The X-REG is presumed to contain $E0-$FF. Because $7B0 is 
outside the source block, it will not be relocated. This may 
be handled in one of two ways. 

(a) The exception is fixed by hand, or 

(b) The block specifications begin one page lower than the 
addresses at which the original and relocated programs 
begin to account for all such 'early regerences'. In 
step (b) of example (1) change to: 

* 900 < 700 . 97F Y C * 

Note that program references to the 'prior page' (in this 
case the $7XX page) which are not intended to be relocated 
will be. 
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3. Immediate Address References 

Assume that the program of example (1) has an immediate ref- 
erence which is an address. For example, 

LDA #$3F 

STA LOCO 

LDA #$08 

STA LOCI 

JMP ( LOCO ) 

In this example, the LDA #$08 will not be changed during relocation 

and the user will have to hand-modify it to $0A. 

4. User function (Y^) programs 

Relocating programs such as RELOC introduces another irregularity. 

C 

Because RELOC uses the MONITOR user function command (Y ) 
its entry point must remain fixed at $3F8 . The rest of RELOC 
may be relocated anywhere in memory (which is trivial since 
RELOC contains no absolute memory references other than the 
JMP at $3F8). The user must leave the JMP at $3F8 undisturbed 
or find some way other than Y^ to pass parameters. 
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5. Unusable block ranges 

A program was written to run from locations $400-$78F on an 
APPLE-I. A version which will run in ROM locations $D000-$D38F 
must be generated. The source (and destination) segments may 
reside in locations $S00-$B8F on the APPLE- 1 1 where relocation 
is performed. 



Locat ions 
dur i ng 
r e 1 ocat ion 

$800 



$BSF 



SEGMENTS, SOURCE AND DEST 



CODE 
$800-$97F 



DATA 
$980-$9FF 



CODE 
$A00-$B8F 



Runs from locations 
$400-$78F on APPLE-I 
but must be relocated 
to run from locations 
$D000-$D38F on the 
APPLE-I I . 



SOURCE BLOCK $400-$78F 
SOURCE SEGMENTS $800-$B8F 



DEST BLOCK $D000-$B38F 
DEST SEGMENTS $800-$B8F 



(a) Load RELOC 

(b) Load original program into locations $800-$B8F (despite "the 
fact that it doesn't run there). 

(c) Specify block parameters (i.e. where the original and 
relocated versions will run) 

* D000 < 400 . 78F Y C * 



| Page 
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(d) Move and relocate all segments in order. 

* 800 < 800 . 97F Y C (first segment, code) 

* . 9FF M (data) 

* . B8F Y c (code) 

Note that because the relocation is done 'in place' the 
SOURCE SEGMENT BEG parameter is the same as the DEST SEGMENT 
BEG parameter ($800) and need not be specified. The initial 
segment relocation command may be abbreviated as follows: 
* 800 < . 97F Y C 

6. The program of example (1) need not be relocated but the page 
zero variable allocation is from $30 to $3F. Because these 
locations are reserved for the APPLE-II system monitor, the 
allocation must be changed to locations $80-$8F. The source 
and destination blocks are thus not the program but rather 
the variable area. 

SOURCE BLOCK $20-$2F DEST BLOCK $80-$8F 

SOURCE SEGMENTS $800-$97F DEST SEGMENTS $800-$97F 

(a) Load RELOC 

(b) Define blocks 

* 80 < 20.2F Y C * 

(c) Relocate code segments and move data segments in place. 



* 


800 < 


88F Y C 


( code ) 


* 


. 8AF 


M 


( dat a ) 


* 


. 90F 


Y C 


( code ) 




. 93F 


M 


(data) 




. 97F 


Y c 


( code ) 
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7. Split blocks with cross-referencing 

Program A resides and runs in locations S800-$8A6. - Program B 
resides and runs in locations $900-$9Fl. A single, contiguous 
program is to be generated by moving program B so that it 
immediately follows program A. Each of the programs contains 
memory references within the other. It is assumed that the 
programs contain no data segments. 



SOURCE SEGMENTS 



DEST SEGMENTS 



$800 — 

$8A6 ~ 

$900 — 
$9F1 — 



Program A 
$800-$8A6 



Unused 



Program B 
S900-$9F1 



$800 



$8A6 
$8A7- 



Program A 
$800-$8A6 



Program B 



SOURCE BLOCK $900-$9Fl DEST BLOCK $8A7-$998 

SOURCE SEGMENTS $800-$8A6 (A) DEST SEGMENTS $800-$8A6 (A) 
$900-$9Fl (B) $8A7-$998 (B) 

(a) Load RELOC 

(b) Define blocks (program B only) 



* 8A7 < 900 . 9F1 Y 
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(c) Relocate each of the two programs 1 individually . Program 
must be relocated even though it does not move. 

* 800 <. 8A6 Y C (program A, 'in place*) 

* 8A6 < 900 . 9F1 Y C (program B, not 'in place') 

Note that any data segments within the two 
necessitate additional relocation and move 



programs would 

j 

commands . 



Code deletion. 

4 bytes of code are to be removed from within a program and the 
program is to contract accordingly. 

SOURCE SEGMENTS DEST SEGMENTS 



$800- 



Remove 4 
bytes here 



S97F- 





CODE 
$800-$88F 




DATA 
S890-$8AF 


CODE 
$8B0-$90F 


) 


DATA 

$910-$93F 


CODE 
$940-$97F 





$800- 



$97B- 



CODE 
$800-$88F 



DATA 
$890-$8AF 



CODE 
$8B0-$90B 



DATA 
$90C-$93B 



CODE 
$93C-$97B 



SOURCE BLOCK 


$8C4-$97F 




DEST 


BLOCK $8C0-$97B 




SOURCE SEGMENTS 


$800-S88F 


( code ) 


DEST 


SEGMENTS $800-$88F 


(code ) 




$890-$8AF 


(data) 




$890-$8AF 


(data) 




$8B0-$SBF 


( code ) 




$8B0-$8BF 


(code ) 




$8C4-$90F 


( code ) 




$8C0-$90B 


(code ) 




$910-$93F 


( dat a ) 




$90C-$93B 


(data ) 






( rnc\e> } 




$93C-$97B 


(code ) 



| Page 
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(a) Load HELOC 

(b) Define blocks 

* 8C0 < 8C4 . 97F Y C * 



(c) Relocate code segments and move data segments in ascending 
address sequence. 

* 800 <. 88F Y C (code, 'in place') 

* . 8AF M (data) 

* . 8BF Y c (code) 

* 8C0 < 8C4 . 90F Y C (code, not 'in place') 

* . 93F M (data) 

* . 97F Y C (code) 



(d) Relative branches crossing the deletion boundary will be 

incorrect since the relocation process does not modify them 
(only zero-page and absolute memory references). The user 
must patch these by hand. 
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9. Relocating the APPLE-II monitor ( $F800-$FFFF ) to run in RAM 
(■SSOO-SFFF) 



SOURCE BLOCK $F700-$FFFF 
(see example (2) ) 



DEST BLOCK $700-$FFF 



SOURCE SEGMENTS $F800-$F961 (code) DEST SEGMENTS $800-$961 (code) 
$F962-$FA42 (data) $962-$A42 (data) 

$FA43-$FB18 (code) $A43-B18 (code) 

$FB19-$FB1D (data) 
$FB1E-$FFCB (code) 
$FFCC-$FFFF (data) 
IMMEDIATE ADDRESS REFS (see example (3) ) 
$FFBF 
$FEA8 

(more if not relocating to page boundary) 



$B19-$B1D (data) 
$B1E-$FCB (code) 
$FCC-$FFF (data) 



(a) Load RELOC 

(b) Block parameters 



* 700 < F700 . FFFF Y * 



(c) Segments 



* 800 < F800 
FA42 M 
FB18 Y C 
FB1D M 
FFCB Y C 
FFFF M 



F961 Y C (first segment, code) 
(data) 
( code ) 
(data) 
( code ) 
(data) 
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(c) Immediate address references 

* FBF ; E (was $FE) 

* EA8 ; E (was $FE) 
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OTHER 6 502 SYSTEMS 



The following details illustrate features specific to the APPLE-II 
which are used by RELOC . If adapted to other systems, the convenient 
and flexible parameter passing capability of the APPLE- I I monitor 
may be sacrificed. 



1. The APPLE-II monitor command 

* A 4 < A x . A 2 Y c (Ai, A 2 , and A 4 are addresses) 
vectors to location $3F8 with the value A 1 in locations $3C (lo 
and $3D (high), A g in locations $3E (low) and $3F (high), 
and A 4 in locations $42 (low) and $43 (high). Location 
$34 (YSAV) holds an index to the next character of the command 
buffer (after the Y c ). The command buffer (IN) begins 
at $200. 



2. If Y c is followed by an then the block parameters are 

simply preserved as follows: 



Parameter 
DEST BLOCK BEG 
SOURCE BLOCK BEG 
SOURCE BLOCK END 



Preserved at 
$8, $9 
$2, $3 
$4 , $5 



SWEET16 Reg Name 
TOBEG 
. FRMBEG 
FRMEND 



If Y c is not followed by and '*' then a segment relocation is 
initiated at REL0C2 ($3BB). Throughout, Al ($3C, $3D) is the 
source segment pointer and A4 ($42, $43) is the destination 
segment pointer. 
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4. INSDS2 is an APPLE-II monitor subroutine which determines the 
length of a 6502 instruction in the variable LENGTH (location $2F) 
given the opcode in the A-REG. 

Instruction type LENGTH 
Invalid 

1 byte ( 

2 byte 1 

3 byte 2 

5. The code from XLATE to SW16RT ($3D9-$3E6) uses the APPLE- I I 
16-bit interpretive machine, SWEET16. The target address of 
the 6502 instruction being relocated (locations $C low and 
$D high) occupies the SWEET16 register named ADR. If ADR is 
between FRMBEG and FRMEND (inclusive) then it is replaced by 
ADR - FRMBEG + TOBEG . 

6. NXTA4 is and APPLE-II monitor subroutine which increments Al 
(source segment index) and A4 (destination segment index). 
If Al exceeds A2 (source segment end) then the carry is set, 
otherwise it is cleared. 
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6502 RELOCATION SUBROUTINE 
4:36 P.M., 11/10/1977 PAGE: 1 



1 


TITLE '6502 RELOCATION 


SUBROUT INE 


2 


************************ 


.* it 


3 


* 




it 


4 




bbvZ RELOCATION 


A 


5 




SUBROUTINE 




6 






* 


7 




1. DEFINE BLOCKS 


it 


8 


* 


*A4 <A1 . A2 ~Y 


it 


9 




("Y IS CRTL-Y) 


■k 


10 


* 




it 


11 


* 


2. FIRST S EG 


* 


12 




*A4<A1.A2 Y 


ir 


1 3 




( i r UUUt ) 




14 


* 






15 


* 


*A4<A1.A2 M 




16 


!* 


(IF MOVE) 


* 


1 7 


* 






18 


* 


3. SUBSEQUENT SEGS 


* 


19 


* 


* . A2 "Y OR *.A2 M 


* 


20 


* 




* 


21 


* 


WOZ 11-10-77 


* 


22 


* 


APPLE COMPUTER INC. 




23 


* 




* 


24 


************************** 


25 




PAGE 
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RELOCATION SUBR EQUATES 



26 


SUBTTL 


RELOCATION SUBR 


EQUATEb 


27 


R1L 


EPZ 


$2 


curPTl £ op^ 1 


28 


INST 


EPZ 


$B 


1 D V rr> E* TK1CT* DTPT H 

j-biib INbi ritijij. 


29 


LENGTH 


EPZ 


$2F 




30 


YSAV 


EPZ 


$34 


CMND BUF POINTtR. 


31 


AIL 


EPZ 


$3C 


APPLE-II MON PARAM AREA. 


32 


A4L 


EPZ 


$42 


APPLE — 1 1 MON rAKAM KLkj 


33 


IN 


EQU 


$200 


t » /~~"\ h 1 >™s tiki *~\ TTi f 1 D 

HON CMND BUF. 


34 


SW16 


ECU 


$F689 


SWEET16 ENTRY. 


35 


INSDS2 


EQU 


$F88E 


DISASSEMBLER ENTRY. 


36 


NXTA4 


EQU 


$FCB4 


POINTER INCR SUBR. 


37 


FRMBEG 


EPZ 


$1 


SOURCE BLOCK BEGIN. 


38 


FRMEND 


EPZ 


$2 


SOURCE BLOCK END. 


39 


TOBEG 


EPZ 


$4 


DEST BLOCK BEGIN. 


40 


ADR 


EPZ 


$6 


ADR PART OF INST. 


41 




PAGE 
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4:36 P.M. , 11/10/1977 











42 










43 


03A6 


A4 


34 




44 


03A8 


B9 


00 


02 


45 


03AB 


. C9 


AA 




46 


03AD 


DO 


OC 




47 


03AF 


E6 


34 




48 


03B1 


A2 


07 




49 


03B3 


B5 


3C 




50 


03B5 


95 


02 




51 


03B7 


CA 






52 


03B8 


10 


F9 




53 


03BA 


60 






54 


033B 


AO 


02 




55 


03BD 


Bl 


3C 




56 


03BF 


99 


OB 


00 


57 


3C2 


88 






58 


03C3 


10 


F8 




59 


03C5 


20 


8E 


F8 


60 


03C8 


A6 


2F 




61 


03CA 


CA 






62 


D3CB 


DO 


OC 




63 


03CD 


A5 


OB 




64 


03CF 


29 


OD 




65 


03D1 


FO 


14 




66 


03D3 


29 


08 




67 


03D5 


DO 


10 




68 


03D7 


85 


OD 




69 


03D9 


20 


89 


F6 


70 


3DC 


22 






71 


03DD 


: D6 






72 


3DE 


02 


06 




73 


3E0 


26 






74 


03E1 


: Bl 






75 


03E2 


02 


02 




76 


03E4 


A4 






77 


03E5 


• 36 






78 


03E6 


00 






79 


03E7 


A2 


00 




80 


03E9 


B5 


OB 




81 


03EB 


91 


42 




82 


03ED 


: E8 






83 


3EE 


: 20 


B4 


FC 


84 


03F1 


: C6 


2F 




85 


03F3 


: 10 


F4 




86 


03F5 


: 90 


C4 




87 


3F7 


: 60 






88 
89 


03F6 


: 4C 


A6 


03 


90 


****** * * SUCCESSFUL 



6502 RELOCATION SUBROUTINE 
SUBTTL 6502 RELOCATION SUBROUTINE 

RELOC 



PAGE i 



INIT 



RELOC 2 
GETINS 



XLATE 



SW16RT 
STINST 
STINS2 



USRLOC 



ORG 


$3A6 




LDY 


YSAV 


CMND BUF POINTER, 


LDA 


IN, Y 


NEXT CMND CHAR. 


CMP 


*?AA 


'*'? 


BNE 


RELOC 2 


NO, RELOC CODE SEG. 


INC 


YSAV 


ADVANCE POINTER. 


LDX 


#$7 




LDA 


A1L,X 


MOVE BLOCK PA RAMS 


STA 


R1L, X 


FROM APPLE-II MON 


DEX 




AREA TO SW16 AREA. 


BPL 


INIT 


Rl=SOURCE BEG, R2* 


RTS 




SOURCE END, R4=DEST BE< 


LDY 


#$2 




LDA 


(AIL) ,Y 


COPY 3 BYTES TO 


STA 


INST, Y 


SW16 AREA. 


DEY 






BPL 


GETINS 




JSR 


INSDS2 


CALCULATE LENGTH OF 


LDX 


LENGTH 


INST FROM OPCODE. 


DEX 




0=1 BYTE, 1=2 BYTE , 


BNE 


XLATE 


2=3 BYTE. 


LDA 


INST 




AND 


#$D 


WEED OUT NON-ZERO-PAGE 


BEQ 


STINST 


2 BYTE INSTS (IMM) . 


AND 


#$8 


IF ZERO PAGE ADR 


BNE 


STINST 


THEN CLEAR HIGH BYTE. 


STA 


INST+2 




JSR 


SW16 


IF ADR OF ZERO PAGE 


LD 


FRMEND 


OR ABS IS IN SOURCE 


CPR 


ADR 


(FRM) BLOCK THEN 


BNC 


SW16RT 


SUBSTITUTE ADR- 


LD 


ADR 


SOURCE BEG+DEST BEG. 


SUB 


FRMBEG 




BNC 


SW16RT 




ADD 


TOBEG 




ST 


ADR 




RTN 






LDX 


#$0 




LDA 


INST,X 




STA 


(A4L) ,Y 


COPY LENGTH BYTES 


INX 


OF INST FROM 


JSR 


NXTA4 


SW16 AREA TO 


DEC 


LENGTH 


DEST SEGMENT. UPDATE 


BPL 


STINS2 


SOURCE, DEST SEGMENT 


BCC 


RELOC 2 


POINTERS. LOOP IF NOT 


RTS 




BEYOND SOURCE SEG END. 


ORG 


S3F8 




JMP 


RELOC 


ENTRY FROM MONITOR. 



NO ERRORS 
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CROSS- 


REFERNCE: 


6 50 2 RELOCATION 


AIL 


003C 


0050 


0056 




A4L 


0042 


082 






ADR 


0006 


0072 


0074 


0078 


FRMBEG 


0001 


0075 






FRM END 


0002 


0071 






GETINS 


03BD 


0059 






IN 


0200 


0045 






INIT 


03B3 


0053 






INSDS2 


F88E 


0060 






INST 


000B 


0057 


0064 


0069 


LENGTH 


002F 


0061 


0085 




NXTA4 


FCB4 


0084 






R1L 


0002 


0051 






RELOC 


03A6 


0090 






RELOC2 


03BB 


0047 


0087 




STINS2 


03E9 


0086 






STINST 


03E7 


0066 


0068 




SW16 


F689 


0070 






SW16RT 


03E6 


0073 


0076 




TOBEG 


0004 


0077 






USRLOC 


03F8 








XLATE 


03D9 


0063 






YSAV 


0034 


0044 


0048 




FILE: 
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RENUMBERING AND APPENDING APPLE-II BASIC PROGRAMS 

The answer to the question "what do 5, 11, 36, 150, 201, and 588 
have in common?" is given as "adjacent rooms in the Warsaw Hilton'^ 
but might just as well be "adjacent line numbers in my last BASIC 
program." The laws of entropy insure that the line numbers of a 
debugged and operational BASIC program give the appearance of having 
been selected by a KENO machine.* Many a time I have spent an extra 
hour to retype a finished program while spacing the line numbers 
evenly just to make it 'look good'. 

Another difficulty which I have experienced is joining two 
BASIC programs into a single, larger one. This 'append' operation 
is easier to accomplish by hand than renumbering. The sophistocated 
user can examine the BASIC memory map and perform some manual mani- 
pulations to join the programs providing that the line numbers do 
not overlap. Still, the manual append operation is highly prone 
to error. 



1 



The 
New 



Official Polish/ Italian Joke Book, L. 
York, N.Y. , 1973, p. 17 



Wilde, Pinnacle Books, 



* In fact while several texts detail how the boundary conditions 
of a KENO game lead to predictable outcomes, finished programs 



seldom exhibit this property. 
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The APPLE-II BASIC user now has a solution to these needs in 
the form of a hand- or tape-loadable program, RENTJM/ APPEND , described 
herein. The CALL command is used to activate one of three machine 
level programs. The renumber operation (RENUM) requires user speci- 
fication of the original line number range over which renumbering 

is to occur, the new initial line number to be applied to the range, 

i 

and the new line number increment to use. The example below specifies 
that lines 200 to 340 be renumbered starting with 100 and spaced 
by 10' s. 

RANGE BEGIN 200 
RANGE END 340 
NEW BEGIN 100 
NEW INCREMENT 10 

A second RENUM entry renumbers the entire program, relieving 
the user of the need to specify the range begin and end parameters. 
The append operation (APPEND) reads the second user (BASIC) program 
off tape with the first in memory. 

Renumber and append error conditions (memory full and line number 
overlap) are detected just as in BASIC. In case of error the user 
is notified and no program alteration occurs. 
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USING RENUM/ APPEND 

1. Load RENUM /APPEND (* 300. 3D4 R) 

Note that the high-order bytes of page 3 are not loaded, preventing 
inadvertant alteration of the interrupt and user function (YC) 
vectors. The '*' is generated by the MONITOR , not the user. 

2. Load a BASIC program. 

3. To renumber entire program: 



POKE 2 , START L 
POKE 3, START H 

POKE 4, INCR L 
POKE 5, INCR H 

CALL 768 



User must supply low and high bytes 
of newSTARTing line number. 

User must supply low and high bytes 
of new line number INCRement . 

(does not alter locations 2-5) 



Note: START L is equivalent to START MOD 256 
START H is equivalent to START / 256 

4. To renumber a range of the program 



POKE 


2 , 


START L 




POKE 


3 , 


START H 




POKE 


4, 


INCR L 




POKE 


5, 


INCR H 




POKE 


6, 


RANGE START 


L 


POKE 


7, 


RANGE START 


H 


POKE 


8 , 


RANGE END L 




POKE 


9 , 


RANGE END H 




CALL 


776 





User must supply low and high bytes 

of renumber range starting line number. 

User must supply low and high bytes 
of renumber range ending line number. 

(does not alter locations 2-9) 
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5. To append program #2 (larger line numbers) to program #1 
(smaller line numbers): 

(a) Load program #2 

(b) CALL 956 

Be sure you are running the fape of program #1 as £his 
command will load it. 

(c) If you get a memory full error then use the command 
CALL 973 to recover the original program. 
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ERRORS 

1. If not enough free memory exists to contain the line number 

table during pass 1 of RENUM then the message '(beep) *** MEM FULL ERI 
is displayed and no renumbering occurs. The same message is 
displayed if not enough free memory exists to hold the product 
of an APPEND. In the case of APPEND , the user will have to type 
the BASIC command CALL 973 to recover his original program. 
The user can free additional memory by eliminating all active 
BASIC variables with the CLR command. 

2. If renumbering results in a line number overlap (detected during 
pass 1 of RENUM) then the message '(beep) *** RANGE ERR ' is 
displayed and no renumbering occurs. This error may mean that 
one or more parameters were not specified or were incorrectly 
specified . 

CAUTIONS 

1. When appending a program, always load the one with greater 
line numbers first. 

2. The user must be aware that branch target expressions may not 
be renumbered. For example, the statement GO TO ALPHA will 
not be modified by RENUM. The statement GO TO 100 + ALPHA 
will be modified only to reflect the new line number assigned 
to the old line 100. 
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APPLE- I I BASIC STRUCTURE 

An understanding of the internal representation of a BASIC 
program is necessary in order to develope RENUMBER and APPEND 
algorithms. Figure 1 illustrates the significant pointers for a 
program in memory. Variable and symbol table assignment begins at 
the location whofee address is contained in the pointer LOMEM ($4A 
and $4B where '$' stands for hex). This is $800 (2048) on the 
APPLE-II unless changed by the user with the LOMEM: command. 
A second pointer, PV (Variable Pointer, at $CC and $CD) contains 
the address of the location immediately following the last location 
allocated to variables. PV is equal to LOMEM if no variables are 
actively assigned as is the case after a NEW, CLR , or LOMEM: command. 
As variables are assigned, PV increases. 

The BASIC program is stored beginning with the lowest numbered 
line at the location whose address is contained in the pointer PP 
(Program Pointer, at $CA and $CB) . The pointer HIMEM ($4C and $4D) 
contains the address of the location immediately following the 
last byte of the last line of the program. This is normally the top 
of memory unless changed by the user with the HIMEM: command. 
As the program grows, PP decreases. PP is equal to HIMEM if there 
is no program in memory. Adequate checks in the BASIC insure that 
PV never exceeds PP. This in essence says that variables and program 
are not permitted to overlap. 
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Lines of a BASIC program are not stored as they were originally 
entered (in ASCII) on the APPLE-II due to a pre-translation stage. 
Internally each line begins with a length byte which may serve as 
a link to the next line. The length byte is immediately followed 
by a two-byte line number stored in binary, low-order byte first. 
Line numbers range from to 32767. The line number is followed 
by 'items' of various types, the final of which is an ' end-of-1 ine ' 
token ($01). Refer to figure 2. 

Single bytes of value less than $80 (128) are 'tokens' generated 
by the translator. Each token stands for a fixed unit of text as 
required by the syntax of the language BASIC. Some stand for keywords 
such as PRINT or THEN while others stand for punctuation or operators 
such as ' , ' or ' + ' . 

Integer constants are stored as three consecutive bytes. The 
first contains $B0-$B9 (ASCII '0'-'9') signifying that the next 
two contain a binary constant stored low-order byte first. The line 
number itself is not preceeded by SB0-$B9. All constants are 
in this form including line number references such as 500 in the 
statement GO TO 500. Constants are always followed by a token. 
Although one or both bytes of a constant may be positive (less 
than $80) they are not tokens. 
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Variable names are stored as consecutive ASCII characters with 
the high order bit set. The first character is between $C1 and $DA 
(ASCII 'A'-'Z'), distinguishing names from constants. All names 
are terminated by a token which is recognizable by a clear high-order 
bit. The '$' in string names such as A$ is treated as a token. 

String constants are stored as a token of value $28 followed 
by ASCII text (with high-order bits set) followed by a token of 
value $29. REM statements begin with the REM token ($5D) followed 
by ASCII text (with high-order bits set) followed by the ' end-of -1 ine ' 

token . 
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Figure 1 - MEMORY MAP 



BASIC 
VARIABLES 



LOMEM (start of variables) 
($4A,4B) 



PV (Variable Pointer, end of variables) 
($CC,CD) 4 



BASIC 
PROGRAM 



pp (Program Pointer, start of program) 

($CA ,CB) 

first line 



— last line 



— HI MEM (end of program) 
($4C,4D) 



Figure 2 - LINE REPRESENTATION 



low 



highj 



length line number 

byte 



items 



$01 



end-of-line ' 
token 



| Page 
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Figure 3 - ITEMS 



Constant 



low 



high] 



$B0-$B9 
Name (ABC): j~$C l | \ fC2 



value 



positive 
token 



$C3 



negative 
ASCII 



□ 



positive 
token 



String Constant ("123"): 



$28 ~\ 


$B1 


1 I $B2 




$B3 | 


| $29 


quote 
token 




negat ive 
ASCII 




quote 
token 



REM: 



Tokens : 



$5D 




REM 






token 






$00- 


$7F 




GO TO 


- $5F 


GOSUB 


- $5C 


THEN 


In - 


- $24 


LIST 




- $74 


LIST 




- $75 


STR 


CON - 


- $28 


REM 




- $5D 


EOL 




- $01 



negat ive 
ASCII 



| $01 



end-of-line ' 
token 



(tokens used by RENUMBER) 
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RENUMBER - THEORY OF OPERATION 

Because of the rigid internal representation of APPLE-II BASIC 
programs (insured by the translator syntax check) writing a renumber 
program was a somewhat easier task than it would have been on many 
small BASIC'S. Fortunately all constants in APPLE-II BASIC (in- 
eluding line number references) are preconverted to binary. 

The normal renumber subroutine entry point is RENUM ($308). 
The RENX entry ($300) conveniently sets the renumber range for the 
user such that the entire program will be renumbered. RENUM exten- 
sively uses SWEET16, the code-saving 16-bit interpretive machine 
built into the APPLE-II. i Occasional 6502 code is interspersed 
throughout RENUM for even greater code efficiency. 

RENUM scans the entire program from beginning to end twice. 
During pass 1 a line number table is built containing all line 
numbers of the program found to be within the renumber range. 
This table begins at the address specified by the BASIC variable 
pointer, PV , and is limited in length by the program pointer, PP. 
Each entry is two bytes long. A memory full error occurs if not 
enough free memory is available for the table. 



Byte M agazi ne , Nov. 1977, pp. 
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As line numbers are entered in the table corresponding new 
line numbers are generated and both- new and old are displayed. 
Should the new line numbers result in an 'out of ascending sequence' 
condition, then a range error occurs and renumbering is terminated. 
It is assumed that the line numbers of the original program are in 
ascending sequence. 

The purpose of pass 2 is to scan the entire BASIC program while 
updating all references of line numbers found in the table to new 
assignments. Aside from the line numbers themselves, the line number 
references sought are identified as constants immediately preceeded 
by one of the following tokens: 

GOTO 
GOSUB 
THEN lno 
LIST 
LIST 

No other statement normally permitted within an APPLE-II BASIC 
program may contain a line number reference. No errors will occur 
during pass 2. 

Exceptions such as empty line number table and null program 
are properly considered by both passes of RENUM . 
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page 13 



When APPEND is called, the user program with larger line numbers 
will be in memory and the one with smaller line numbers will be read 
off tape. The current program resides between two pointers, PP and 
HI MEM . HIMEM is preserved and set to the value contained in PP. 
This 'hides' the original program and prepares to load a new one 
immediately above it in memory. 



The BASIC load subroutine is called and a normal memory full 
error condition will result if not enough free memory is available 
to contain both programs. If this error occurs then the original 
program will still be hidden. Fortunately, it can be recovered by 
calling the tail end of APPEND at $3CD which simply restores HIMEM. 
If the load is successful then HIM EM is restored to its original value 
and both programs will be joined. No line number overlap check is 
performed . 



Original Program 



After Load 



PP 



PP- 



HIMEM ■ 



Prog #2 



Prog #1 



Prog #2 
( hi dden ) 



HIMEM Restored 
PP 

Prog #1 



Prog #2 



HIMEM- 



HIMEM 
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RENUMBER EXAMPLE 


Renumber lines 100-110 


Original to start at 150 

spaced by 10 


>LI5T >P0K£ 


2, 150 MOD 256 


1 GOTO 100 \ 

2 GO S'J 3 103 >?0KS 


3, 150 / 256 


3 IF TP.'JE THEN 107 

4 LI ST 109,110 >?0KE 


4, 10 MOD 256 


1 00 REM 

103 REM >P0KE 


5, 10 / 256 


107 REM 

109 REM >P0K£ 


6, 100 MOD 256 


110 RE K 

200 FOR 1=1 TO 10 >P0KE 


1, 100 / 256 


210 PRINT I 

2 20 NEXT I >POKE 


8, 110 MOD 256 


230 GOTO 1 

>POK£ 


9, 110/ 256 


>CALL 


776 


1 00- > 1 50 


1 03 -> I 60 


107-> 


170 


109- > 


1 80 


I 1 0- > 1 90 


>LIST 




I 


GOTO 150 


2 


G0SU3 160 


3 


IF TRUE THEN 170 


4 


LIST 180,190 


150 


REM 


160 


REM 


170 


REM 


180 


REM 


1 90 


REM 


200 


FOR 1=1 TO 10 


2 10 


PRINT I 


220 


NEXT I 


230 


GOTO I 
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RENUMBER EXAMPLE (cont) 


Renumber lines 100-110 to start at 


10 spaced by 5 




m n n p s ft 


s. d n iv ^ T in 
> . M U rvc J j l u 


/ PS ft 


>P0KE 4, 5 


MOD 256 


> ? K— 5 j o 


/ ^ A 


>oALL fOS 




l-> 1 




2-> 15 




3->20 




4->25 




150->30 




160->35 




1 70->40 




l80->45 




190->53 




203- >55 




21 0->60 




220->65 




230->70 




>LIST 




10 GOTO 


30 


15 G0SU3 


35 


20 IF TR'JE THEM 40 


25 LIST 


45,50 


3 REN 




35 P.EM 




4 REM 




45 REM 




5 REM 




5 5 FOR I 


=1 TO 10 


60 PRINT 


I 


6 5 NEXT 


I 


70 GOTO 


1 
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>LIST 






100 


REM 




200 


REM 


THE ORIGINAL PROGRAM 


300 


REM 




>CALL 


956 




>LIST 






1 


HEM 




20 


REM 


THIS PROGRAM CAKE FROM 


30 


REM 




1 00 


REM 




200 


REM 


THE ORIGINAL PROGRAM 


300 


REM 
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APPLE-II BASIC RENUMBER/APPEND SUBROUTINES 
9i53 A.M., 1 1/2 1 /197 7 °AGE t I 

RENUMBER/ APPEND SUBROUTINES' 



1 


TITLE 'APPLE- I I 3ASIC 


2 


*********************** 


3 


* 




* 


4 


* 


APPLE- 1 1 BASIC 


* 


5 


* 


RSNUK3ER AND APPEND 


* 


6 


* 


SU3R0UT INES 


* 


7 


* 




* 


3 


* 


RENUMBER 


* 


9 


* 


NEW INITIAL (2,3) 


* 


1 


* 


NEW I NCR (4,5) 


* 


I | 


* 


RAN3E BEG (6,7) 


* 


12 


* 


RANGE END (3,9) 


* 


13 


* 




* 


14 


* 


USE RENX ENTRY 


♦ 


15 


* 


FOR RENUMBER ALL 


* 


16 


* 




* 


17 


* 


WOZ 11/16/77 


* 


1 3 


* 


APPLE COMPUTER INC. 


* 


19 


* 






20 


*********************** 


2t 




PAGE 
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6502 EQUATES 

9j53 A.M.* 1 1/21/1977 



22 


S'J3TTL 


6502 EQUATES 




23 


SOL 


EPZ 


SO 


LOW-ORDER SVI6 RO BYTE 


24 


ROM 


EPZ 


S 1 


HI -ORDER. 


25 


Rl iL 


EPZ 


S 16 


LOV-ORDER SVI6 R1I 3YX 


26 


Rl IH 


EPZ 


$ 17 


HI -ORDER. 


27 


Hl,MEM 


EPZ 


J4C 


BASIC HIMEM POINTER. 


28 


PPL 


EPZ 


$CA 


BASIC PROG POINTER. 


29 


P7L 


EPZ 


$CC 


3ASIC VAR POINTER. 


30 


MEMFULL 


EQU 


$£363 


BASIC MEM FULL ERROR. 


3! 


P P.DEC 


EQ'J 


SE5 13 


BASIC DECIMAL PR I NT SI 


32 


RANG ERR 


EQU 


JEE68 


BASIC RANGE ERROR. 


33 


LOAD 


EQU 


JFODF 


BASIC LOAD SU3R. 


34 


S-J16 


EQ'J 


SF639 


SWEET 16 ENTRY. 


35 


CROUT 


EQU 


$FD3E 


CAR RET SUaR. 


36 


COUT 


EQU 


SFDED 


CHAR OUT SUSR. 


37 




PAGE 







Distributed under the Creative Commons License on page 5 



Page 0187 of 0213 



The Woz Wonderbook -- 1977 -- DigiBarn Computer Museum -- Steve Wozniak, Apple Computer Inc. 



SWEET 16 EQUATES 

9i53 A.M., 11/21/1977 PAGE t 3 



38 


SUBTTL 


SWEET I 6 


EQUATES 




39 


ACC 


EPZ 


SO 


SWEET I 6 ACCUMULATOR. 


40 


NEVLOV 


EP2 


S 1 


NEW IMITIAL LNO. 


41 


NEWINCR 


EPZ 


$2 


NEW LNO I NCR. 


42 


LNLOV 


EPZ 


S3 


LOV LMO OF RE MUM RANGE 


43 


LNHI 


EPZ 


S4 


HI LNO OF RENUM RANGE. 


44 


T3LSTRT 


EPZ 


S5 


LMO TABLE START. 


45 


T3L.NDXI 


EPZ 


$6 


PASS ! LMO TBL INDEX. 


46 


T3LIM 


EPZ 


$7 


LNO TA3LE LIMIT. 


47 


SCR8 


EPZ 


58 


SCRATCH REG • 


43 


HKEM 


EPZ 


S8 


H I MEM (END OF PRGM) • 


49 


SCR9 


EPZ 


$9 


SCRATCH REG. 


50 


PRGNDX 


EPZ 


$9 


PASS 1 PROG INDEX. 


5 1 


PRGNDXI 


EPZ 


$A 


ALSO PROG INDEX. 


52 


NEVLM 


EPZ 


S3 


NEXT * NEW LNO ' . 


53 


NEVLN 1 


EPZ 


sc 


PRIOR ' NEW LNO * ASSIG1 


54 


T3L-ND 


EPZ 


S6 


PASS 2 LNO TABLE END. 


55 


PRGNDX2 


EPZ 


$7 


PASS 2 PROG INDEX. 


56 


CHRO 


EPZ 


S9 


ASCII '0'. 


57 


CHRA 


EPZ 


SA 


ASCII *A*. 


58 


MODE 


EPZ 


SO 


CONST/LNO MODE. 


59 


T3LNDX2 


EPZ 


SB 


LNO TBL IDX FOR UPDATE 


60 


OLDLN 


EPZ 


SO 


OLD LNO FOR UPDATE. 


61 


STRCON 


EPZ 


S3 


BASIC STR CON TOKEN. 


62 


REM 


EPZ 


SC 


BASIC REM TOKEN. 


63 


RI3 


EPZ 


SO 


SWEET 16 REG 13 CCPR Rl 


64 


THEN 


EPZ 


SD 


BASIC THEN TOKEN. 


65 


LIST 


EPZ 


SO 


3ASIC LIST TOKEN. 


66 


SCRC 


EPZ 


sc 


SCRATCH REG FOR APPENB 


67 
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a a 
o o 


jUOl 1 L 


APPLE- 1 I 3AS1C RENUMBER SU3R0UT1NE - PASS 1 










A 

o y 




a on. 


« i nn 

j> J uu 




UJUU I 


on 


A O 


r O 


f U 




U 3 M 




npT T OM AT PAMcr PUTftY- 
u ~ i k UJinL nni»u& c#.» i •» i • 


OJ J t 


DA 






* t 
r I 




Cll Q 

jUa 


now 




0304 t 


J J 






7 P 




J 1 


t mi nu 

Uv UU w 


cpt t mi nv»n • 


U J U> 1 


J4 






7 




C T 

ST 


t MU f 

LNtti 


wiv ni**r r rr 


AO A£ • 


PA 






f 4 






1 MU I 

L.NM i 




rt i n t » 
30 7 t 


00 






7< 




Hi PI 






ujuo t 


Oft 


A o 

o y 


r o 


7A 




1 c o 


CTT I a 




JUo S 


1 o 


** u 


n n 
u u 


7 7 






CfOfl UTMPM 

jU r£C5 * n 1 PI£*n 




A AC • 


O 






7ft 




L.UU 


V So rt3 


sac r n utmPM pn T MTF*T? 


UJuf I 


1 fl 

J 






70 

f y 




CT 


nntll 


Tn UMPM. 

1 u n r*& n • 


U J 1 u • 


1 Q 
1 y 




nn 
uu 


an 
o u 




1 


bu fry > rVL+fi 




p\^S 1 1 i 

J 1 J I 


w y 






A 1 




ba on 


a c n o a 
• 5CK9 


oaC f f if AO DTP Trt 


UJ 14 1 








o p 




C T 

Ol 


T3L5T FIT 


Tftl CTPT AMH TPt MOYt • 


AO 1 ft • 

O J 19 1 


JO 






A 1 
O J 




CT 


tat u ny 1 




UO 10 1 


9 I 






A A 




i n 


Nc. V LOW 


P*A BV itpt/l A Lf /TMfTTAf 1 
UU PT NLWLUW \ Ivil I 1AL/ 


U J 1 J I 








OD 




e t 


NEWLN 


1 u NtwLN • 


AO 19* 
J I O X 


TP 










5T 


NtVLN J 




a 1 1 a • 

U J 1 71 


r q 
oy 






ft 7 




Pu ?y 


f 5CH9 


OftCrP DP A 12 OTP 

oho i u PnUa P 1 ri 


U J inl 


J f 






o o 




5T 


TSLIW 


Trt TPt TM 


A O i Q • 












ST 


*o op m nv 
P FIG N OX 


ANU PrrvaiMUA* 


AO IPi 

O J 1 1 


9a 

C7 






on 


rnJ d 1 




nop ii nv 




ao i n • 


UO 






a t 
y i 




r* n o 
Pri 


Mncn 




AO IP* 


UJ 


A A. 




y c 




r» r» 

aC 




tupm nnwP oAce i . 
inc.nl UUIVt rAij I* 


AO P A * 

U Jeu t 


J A 






O 1 




C T 


nnr ilt nv 1 




AO O 1 • 


CO 










i n 


I OLNUA 1 






p n 






yo 






AO U 


tp « o QVTPC ATTAtl TM 


Uoco I 


nl 
U 1 






y o 




P DO 


T Qf f M 


f MA TAP! P THFM P?T ? TB 


AO A • 
UJ CHI 


U J 


1 A 
J 55 




Q 7 

y / 




or 
Ow 


nc. rvrt 


UITW *MrM FIIT 1 ♦ M^R^ 
w i i (i n 4*j rui^M »' ju« 


AO 2* t 


h A. 






OA 

y o 




t n 


f rttljIVUA 1 




AO 9?t 


A O 

m y 






y y 




& n n 

>iU u 


raU W UA 


Ann T PM PVTF Trt 


UJcOi 


o y 






i nn 

I uu 




CT 


P rtu NvA 




AO P O t 


OH 






t n i 

l U 1 




i nn 


a oo a m nv i 


Liivc rtupiocn* 


A 9 A • 
UJ lHI 


n i 

UJ 






1 Uc 




u Prl 


i ui ntf 


tp < t Mf nu THEM 


ao p a • 


np 
U 


P & 




i n i 

1 U J 




onr u 


Din 


nn Trt P ! 3. 

UU IU / I -J • 


ao on t 


ni 






1 OA 

1 UH 




pap 

U r M 




tp > 1 mU T THEM 


AOOp i 




U* 




i ns 

l UO 




Jjtw o 


D t A 
r In 


rco Tn P!C» 


UO <J \J I 


y # 


i n 

J u 




1 OA 

1 UO 






P I w 












i n 7 

1 U f 


P 1 A 


j 1 y 


f Jo LmV ua 1 


ADD TD T Mfl TABLE. 


\-» J O J I 








1 OR 

1 U Q 




PTM 






m i a t 




U I 




i no 

1 u ~ 




l*Uff 


DAtf 

rvun 


ASnP CADE **# 


m ^a i 


A£ 


u u 




1 1 n 

• 1 u 






Rni 




nils t 

UJ JO 1 


2ft 






1 1 1 

III 




! ^ P 

u -> n 


ppnpr 




mint 


AO 
« y 






1 1 2 

lib 




LDA 


#$AD 


(R0,R1 1 > I.M DECIMAL. 


033D» 


20 


ED 


FD 


113 




JSR 


C0UT 




03401 


A9 


3E 




1 14 




LDA 


#S3£ 




03421 


20 


EO 


FD 


1 IS 




JSR 


C0UT 




03451 


A5 


I 7 




1 16 




LDA 


HI IK 




03471 


A6 


16 




117 




LDX 


R 1 1L 




0349t 


20 


13 


£5 


t 18 




JSR 


PRDEC 




034CI 


20 


8E 


FD 


119 




JSR 


CR0UT 




034r« 


20 


8C 


F6 


120 




JSR 




*** END 6502 CODE *** 


0352» 


2B 






121 




LD 


N£VLN 
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APPLE-II BASIC 


RENUMBER SUBROUTINE 


- PASS 1 


o • c t 
9 I 3 J 


A« M • 


. 11/21/1977 






PAGE t 5 


035 J t 


3C 




1 22 


ST 


NEVLN 1 


COPY NEVLN TO NEVLN 1 


0354 S 


A2 




123 


ADD 


NEWIMCR 


AND I NCR NEVLN BY 


□355 f 


33 




1 24 


ST 


NEVLN 


NEW I NCR* 


0356 t 


0D 




t 25 


NUL 




(WILL SKIP NEXT INST>. 


035 7 t 


! 




126 P19 


• CPR 


NEVLOW 


IT LOW LNO < NEVLOV 


035 8 1 


02 


ca 


127 


BMC 


PASS 1 


THEN RANGE ERR. 


035 A t 


00 




128 R£RR 


RTM 




PRINT • RANGE ERR' MSG 


035BI 


4C 


68 EE 


1 29 


JMP 


RAMGERR 


AND RETURN. 


035Et 


00 




130 KERR 


RTN 




PRINT ' MEM FULL* MSG 


035FI 


4C 


63 £3 


131 


JMP 


MEMFULL 


AND RETURN. 


0362» 


EC 




132 PIC 


INR 


NEVLN 1 


IF HI LNO <■ MOST RECf 


036 31 


DC 




133 


CPR 


NEVLN 1 


NEVLN THEN RANGE ERB 


0364t 


02 


F4 


1 34 


BNC 


RERR 










135 


PAGE 
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136 SU3TTL APPLE-II BASIC RENUMBER SUBROUTINE - PASS 2 



0366 t 


19 


30 


00 


137 


PASS2 


SET 


CHRO, $80 


ASCII •O* 


03691 


IA 


CI 


00 


138 




SET 


CHRA/SCI 


ASCII 'A' 


036C t 


27 






139 


P2A 


LD 


PRGNDX2 




036D» 


08 






140 




CPR 


HMEM 


IF PROG INDEX * HI MEM 


036EI 


03 


63 




141 




BC 


DONE 


THEN DONE PASS 2. 


0370: 


E7 






142 




INR 


PRGNDX2 


SKIP LEN BYTE. 


0371 I 


67 






143 




LOO 


•P3GNDX2 


LINE NUMBER* 


03 72t 


3D 






144 


UPDATE 


ST 


OLDLN 


SAVE OLD LNO* 


03731 


25 






145 




LD 


TBLSTRT 




0374« 


3B 






146 




ST 


T3LNDX2 


INIT LNO TABLE INDEX. 


03 75 t 


21 






147 




LD 


NEVLOV 


INIT NEVLN 1 TO NEVLOV. 


03 76i 


IC 


00 


00 


148 




SET 


NEVLN 1 , 


(WILL SKIP NEXT 2 IN St 










149 




ORG 


*-2 




03771 


2C 






150 


UD2 


LD 


NEVLN 1 




03781 


A2 






151 




ADD 


NEWINCR 


ADO INCR TO NEVLN 1. 


03791 


3C 






152 




ST 


NEVLN 1 




037AI 


SB 






153 




LD 


TBLNDX2 


IF LNO TBL IDX ■ TBLND 


03 73t 


B6 






154 




SUB 


TBLND 


THEN DONE SCANNING 


03 7C» 


03 


07 




155 




3C 


UD3 


7 MO TABLE. 


03 7EI 


6B 






156 




LDD 


tTBLNDX2 


NEXT LNO FROM LNO TABK 


03 7FI 


BO 






157 




SUB 


OLDLN 


LOOP TO t)D2 IF NOT SAH 


0380t 


07 


F5 




158 




BNZ 


UD2 


AS OLDLN. 


03821 


C7 






159 




POPD 


•PRGNDX2 


REPLACE OLD LNO WITH 


0383 t 


2C 






160 




LD 


NEVLN I 


CORRESPONDING NEV LS 


0384 t 


77 






16 1 




STD 


•PRGNDXS 




0385 » 


IB 


28 


00 


I6e 


UD3 


SET 


STRCON, $28 


STR CON TOKEN. 


03 881 


IC 


00 


00 


163 




SET 


MODE, 


(SKIPS NEXT 2 INSTR'S* 










164 




ORG 


*-2 




03891 


67 






165 


GOTCON 


LDD 


•PRGNDX2 




03SAI 


FC 






166 




DCR 


MODE 


IF MODE * THEN UPDAff 


03881 


08 


ES 




167 




BMI 


UPDATE 


LNO REF. 


038DI 


47 






168 


ITEM 


LD 


tPRGNDX2 


BASIC ITEM. 


038EI 


09 






169 




CPR 


CHRO 




036Ft 


02 


09 




170 




BNC 


CHKTOK 


CHECK TOKEN FOR SPEC 11 


0391 1 


OA 






171 




CPR 


CHRA 


IF >■ '0' AND « »A* TH 


03921 


02 


F5 




172 




BNC 


GOTCON 


SKIP CONST OR UPDATi 


0394 1 


F7 






173 


SKPASC 


OCR 


PRGNDX2 




03951 


67 






1 74 




LDD 


•PRGNDX2 


SKIP ALL NEG BYTES OF 


0396 t 


05 


FC 




175 




BM 


SKPASC 


STR CON, REM, OR NAB 


03981 


F7 






176 




OCR 


PRGNDX2 




0399t 


47 






177 




LD 


•PRGNDX2 




039A» 


OB 






1 78 


CHKTOK 


CPR 


STRCON 


STR CON TOKEN? 


039B» 


06 


FT 




1 79 




BZ 


SKPASC 


YES, SKIP SUBSEQUENI 


039Di 


IC 


5D 


00 


180 




SET 


REM,$5D 




03A0t 


DC 






181 




CPR 


REM 


REM TOKEN? 


03A1 > 


06 


Fl 




182 




BZ . 


SKPASC 


YES, SKIP SUBSEQUENT 


03A3t 


08 


13 




183 




BMI 


CONTST 


GOSUB, LOOK FOR LNO. 


03A5I 


FO 






184 




OCR 


R13 




03A6I 


FD 






185 




DCR 


R13 


(TOKEN $5F IS GOTO) 


03A7i 


06 


OF 




186 




32 


CONTST 


THEN LNO, LOOK FOR LNO • 


03A9I 


10 


24 


00 


187 




SET 


THEN, $24 




03ACI 


00 






188 




CPR 


THEN 




03AD» 


06 


09 




169 




3Z 


CONTST 


TH -N LMO, LOOK FOR LNO. 
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03AT i 


FO 




19Q 




DC R 


ACC 




03301 


06 


BA 


191 




3Z 


PSA 


EOL (TOKEN $01)7 


03B2I 


10 


74 00 


193 




SET 


LIST, $74 




0335 I 


BO 




193 




SUB 


LI ST 


SET MODE * IF LIST 


0336 » 


09 


01 


194 




3NMI 


C0NTS2 


OR LIST COMMA C$73, • 


03381 


BQ 




195 


CONTST 


SUB 


ACC 


CLEAR MODE FOR LNO 


03391 


3C 




196 


C0NTS2 


ST 


MODS 


UPDATE ClfECK. 


033AI 


01 


01 


197 




BR 


ITEM 


CHECK NEXT BASIC ITEM. 








198 




PAGE 
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9 t 5 "? 


A • M • t 


1 1/2 t/J 977 






PAGE: 9 








too ^'i 3TTT 


APPLE- I 1 


BASIC APPEND 


S'JBROUT INE 


033C t 


20 


89 F6 


200 ;'-.PP£MD 


J 5R 


SV I 6 




033F t 


1 C 


4£ 00 


201 


SET 


SCRC..HIMEM + 2 




03C2 1 


cc 




202 

& W & 


POPD 


tSCRC 


SAVE HI MEM. 




38 




203 


ST 


HMEM 






1 ft 


CA 00 




SET 


SCR9* PPL 




03C7 t 


69 




205 


LDD 


9SCR9 


SET HIMEM TO PRESERVE 


03C8 » 


7C 




& W 9 


STD 


• SCRC 


PROGRAM* 


03C9 x 


00 




207 


RTN 






03CAt 


20 


DF FO 


203 


JSR 


LOAD 


LOAD FROM TAPE. ' 


03CDt 


20 


89 F6 


209 


JSR 


SW16 




03DOt 


CC 




210 


POPD 


• SCRC 


RESTORE HIMEM TO SHOW 


03D1 t 


28 




211 


LD 


KM EM 


BOTH PROGRAMS 


03D2t 


7C 




212 


STD 


• SCRC 


(OLD AND NEW). 


03D3i 


od 




213 DONE 


RTN 




RETURN. 


03D4t 


60 




214 


RTS 
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CR0S5-REFE 

c:;.-:roK 
c:-:aO 

CHP.A 
C0.MTS2 
C~ ::4TST 
C"JT 
C" OUT 
l ': £ 
GO .0 0:4 

Hi. zn 

K.-;EM 

IVEM 

LIST 

L.JHI 

L'JLOV 

LOAD 

;^i::-'Ul.L 

KERR 
IODE 
KCVINCR 

vln 

NEWLOW- 
OLTLN 
PI A 

pia 

?ic 

P"! A 
PASS 1 
PAS S 2 
FPL 

PS DEC 
P'r.GN'DX 

PPG:iDX2 
Fv'L 
?.0H 
HOL 
Rl 1 H 
PA 1 L 
P.l 3 

RVJGERH 

. t— I 4 

REM'JM 
EENX 

SCR3 
SCR9 
SC RC 
SKPASC 
STP.CON 
SV 1 6 
T3LIM 
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033C 

3 9 A 

0009 
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0389 
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FDED 
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03D3 

0389 

OOflC 

0008 
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0003 

FODF 

E36B 

035E 

00OC 

0002 

OOOB 

OOOC 

0001 

OOOD 

0332 

0357 

0362 

036C 

03 !C 

0366 

OOCA 

£5 18 

0009 

OODA 

0007 

OOCC 
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0000 

0017 

0016 

OOOD 

EE68 

OOOC 
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0300 

035 A 

0003 

0009 
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0394 

0003 

F689 

0007 

0006 

0006 

0033 
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OOOD 
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0090 0099 
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The Woz Wonderbook 

References 

David T Craig • 03 November 2004 



Here is a list of Apple Computer and Apple-II computer technical and historical 
reference materials that may prove beneficial to readers of the Woz Wonderbook 
who want to know more about the details behind this document and the Apple-II 
computer in the late 1970' s. 

These more polished references originated in publicly published Apple Computer 
documents, magazine articles, and Apple-II enthusiast private materials. 

David T Craig (shirlgato@cybermesa.com) has digital copies of all of these 
materials. These materials may possibly be provided with DigiBarn's Woz 
Wonderbook digital materials via its web site or a CD. 

SYSTEM DESCRIPTION: THE APPLE-II 

Steve Wozniak • BYTE Magazine • May 1977 

This description of the Apple-II computer by its main designer provides a 
concise description of this computer's technical features. 

MICROCOMPUTER FOR USE WITH VIDEO DISPLAY 

Steve Wozniak • US Patent 4,136,359 • 23 January 1979 

This is Apple Computer's patent for the Apple-II computer assigned to Steve 
Wozniak. Dry reading, but has some good Apple-II technical information. 
Available on the US Patent Office web site http://www.uspto.gov/patft/. 

APPLE-II HISTORY 

Steven Weyhrich • http://apple2history.org/history/ • 1991-2003 

This great web site contains a cornucopia of accurate Apple-II historical 
information. If you want to learn about the origins of Apple Computer and the 
Apple-I and Apple-II computers, this is the place to go. Also available on the 
internet at http: //www. bli nkenli ghts . com/classi ccmp/apple2hi story . html . 

SWEET-16: THE 6502 DREAM MACHINE 

Steve Wozniak • BYTE Magazine • November 1977 

This is Steve Wozniak's comprehensive description of his SWEET-16 16-bit byte- 
code "meta microprocessor" interpreter built into the Apple-II Integer BASIC 
ROM. Wozniak's Apple-II system description in BYTE May 1977 also has a short 
description of SWEET-16. 
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APPLE-II REFERENCE MANUAL ("RED BOOK") 

Apple Computer • January 1978 

This is Apple Computer's first published technical reference manual for the 
Apple-II computer. It is commonly referred to as the "Red Book" because it has a 
red cover. The Red Book's contents (155 pages) were based on the Woz Wonderbook 
but in a more polished format, but is not as comprehensive or readable as the 
later Apple-II reference manuals. A good PDF scan of the Red Book can be found 
on the internet at http://bitsavers.org/pdf/apple/ along with several other 
older Apple-II manuals. 

APPLE-II REFERENCE MANUAL 

Apple Computer • 1979 • Document # 030-0004-01 

This is Apple Computer's first revision of the Apple-II Red Book. This 275 page 
manual is much improved over the Red Book and tremendously improved over the Woz 
Wonderbook materials. Note the Apple document number (030-0004-01) which 
indicates this is a technical manual (030), is document number 4 (0004), and is 
revision 1 (01) which means this is Apple's 4th published manual. 

APPLE-II MINI MANUAL 

Apple Computer • 1977-1978 

This 68 page manual from Apple Computer appears to be the predecessor to the Red 
Book from 1978. As such, I would date this manual in the 1977-1978 range. More 
complete and more detailed than the Woz Wonderbook, but not as good as the Red 
Book. A good PDF scan of this manual can be found on the internet at 
http : //bi t savers . org/ pdf / apple/ . 

THE WOZ PAK][ 

Call-A. P. P. L.E. Magazine • 15 November 1979 

This 138 page document contains a large number of technical documents about the 
Apple-II computer courtesy of Apple Computer and Call-A. P . P . L . E . magazine. This 
is better organized and more comprehensive than the Woz Wonderbook or the Red 
Book, but not as good as the Apple-II Reference Manual from 1979. Contains a 
detailed article on the Apple-II floating point package. 

PEEKING AT CALL-A.P.P.L.E. 

Call-A. P. P. L.E. Magazine • 1978 and 1979 

This 2 volume set (volume 1 dated 1978 has 92 pages, volume 2 dated 1979 has 206 
pages) contains lots of Apple Computer re-produced technical information and 
original Cal I -A. P . P . L . E . magazine information. Well worth reading. 
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PROGRAMMER'S AID #1: 
INSTALLATION AND OPERATING MANUAL 

Apple Computer • 1978 ♦ Document # 030-0026-01 

This 113 page Apple manual describes the special programming built into the 
Programmer's Aid #1 ROM chip (there was never an Aid #2 chip AFAIK) . Includes 
several 6502 assembly language programs by Steve Wozniak which used his 5WEET-16 
16-bit byte-code interpreter. Includes more polished information for the Integer 
BASIC renumber and append programs described in the Woz Wonderbook. 

FLOATING POINT ROUTINES FOR THE 6502 

Steve Wozniak & Roy Rankin 
Dr. Dobb's Journal of Computer Calisthenics & Orthodontia • August 1976 

This is an article on the Apple-II floating point package pre-dating the Woz 
Wonderbook. Has more details about this package than the Wonderbook. Available 
on the internet at www.strotmann.de/twiki/bin/view/APG/AsmAppleFloatingPoint. 
Concerning authorship of this floating point package, web site 
http://linux.monroeccc.edu/~paulrsm/dg/dg32.htm says Wozniak wrote the core 
package routines (e.g. ADD) and Rankin wrote the transcendental routines (e.g. 
LOG) . 

DISASSEMBLER PROGRAM FOR THE 6502 

Steve Wozniak & Allen Baum 
Dr. Dobb's Journal of Computer Calisthenics & Orthodontia • September 1976 

This is an article on the Apple-II 6502 disassembler pre-dating the Woz 
Wonderbook. Available on the internet at http://users.telenet.be/kiml- 
6502/kun/il4/p06.html . 

THE APPLE II PLUS PERSONAL COMPUTER SYSTEM 

Apple Computer • November 1981 

This is Apple Computer's data sheet for the Apple-II Plus computer, the 
successor to the Apple-II computer. Shows how some of the enhancement ideas 
documented in the Woz Wonderbook and the Red Book were implemented by Apple. 

PRELIMINARY APPLE BASIC USERS MANUAL 

Apple Computer • October 1976 

This 16 page manual seems to be Apple Computer's first user manual for its 

Apple-II Integer BASIC programming language. The Woz Wonderbook is very lacking 

in Integer BASIC information for the user. A good PDF scan of this manual can be 
found on the internet at http://bitsavers.org/pdf/apple/. 
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APPLE TECH NOTES 

Apple Computer and the International Apple Core (IAC) • July 1982 

This 500 page document contains an extensive collection of Apple Computer 
technical notes from 1982 covering the Apple-II and Apple-Ill computer families. 
Many Apple-II hardware, software and documentation errata details are here. 
Includes articles about the Apple-II mi ni -assembler and cassette interfacing. A 
treasure trove of early Apple system technical information. 

APPLE-II SYSTEM MONITOR ROM LISTING 

Apple Computer • 1977 

For detailed information about the internal software workings of the Apple-II 
computer the source listing for the Apple-II System Monitor ROM is the key. 
Available in the Apple-II reference manual dated 1979 or on the internet at 
http : //members . buckeye -express . com/ma rksm/6502/ . 

STEVE WOZNIAK INTERVIEW: HOMEBREW TO CHAMPAGNE 

Apple Orchard Magazine • Spring 1981 

An early interview with Steve Wozniak in which he provides contemporary details 
about Apple Computer's origins and early days. 

STEVE WOZNIAK INTERVIEW: THE APPLE STORY 

BYTE Magazine • December 1984 

A great interview with Steve Wozniak by BYTE magazine with lots of Apple 
Computer and Apple-II information. Also includes a retrospective on SWEET-16, 
Wozniak's 16-bit byte-code interpreter. This is available on the internet at 
http: //apple2hi story . org/museum/arti cles/byte8412/by te8412 . html . 

STEVE WOZNIAK INTERVIEW: STEVE WOZNIAK UNBOUND 

SlashDot Interview • January 2000 
http://slashdot.org/interviews/00/01/07/1124211 . shtml 

This 2000 interview of Steve Wozniak contains some good 24 year recollections 
about Apple Computer's origins and early years. 
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The Woz Wonderbook 

Bill Goldberg Interview 

Bruce Damer • 19 April 2004 



Source : 

http : //www. digi barn . com/collect ions/ books/woz-wonderbook/goldberg -on -woz -won 

derbook.mp3 (3.3 MB file) 

Transcript created by 
David T Craig <shi rlgato@cybermesa . com> -- 02 November 2004 

Interviewer: Bruce Damer <bdamer@digitalspace.com> 
Interviewee: Bill Goldberg <bi llau@coastsi de . net> 

Interview duration: 3:39 minutes 



BACKGROUND 

The "Woz Wonderbook" was a compilation of notes from Steve Wozniak's filing 
cabinet that served as the first documentation and technical support manual 
for the Apple II computer (before the more famous "red book" of January 
1978). Bill Goldberg, longtime Apple employee, donated his copy of the 
Wonderbook to the DigiBarn (thanks Bill!). At the time he was at Apple there 
was only a single copy of this thick binder of photocopied notes, diagrams 
and such to be found in the Apple library. Bill, being in the technical 
support role and a natural pack rat, made a copy of the Wonderbook. 



INTERVIEW TRANSCRIPT 
BILL GOLDBERG 



BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 
BILL GOLDBERG: 



Here it's faded. This is the Woz Wonderbook. And its 
disorganized but I found the copy of this in the Apple library 
and immediately made some copies of it. 

So this was before the Red Book? 

This is what the Red Book was made from. 

Oh gosh. 

Actually, I've got one or two Red Books for you. 

Wonderful, because the Red Book we have is on loan. 

Actually, in Service Engineering we would get the leftovers of 
things. People would say "we don't need any more of this". So we 
had two cases of Red Books and a few of us in the department 
said "Hmm, these are worth something" and we divided them up. 
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BRUCE DAMER: 
BILL GOLDBERG: 

BRUCE DAMER: 
BILL GOLDBERG: 

BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 
BILL GOLDBERG: 

BRUCE DAMER: 
BILL GOLDBERG: 

BRUCE DAMER: 

BILL GOLDBERG: 

BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 
BILL GOLDBERG: 

BRUCE DAMER: 
BILL GOLDBERG: 
BRUCE DAMER: 



Wow. 

So, anyway, in here you will find some of the stuff typed, a 
number of different articles, but you will also find, 
unfortunately the xerox did the best job it could and it has 
faded over the years, but there's handwritten notes. 

So Woz wrote these notes? 

Uh-Hmm [yes]. Here's a listing with some hand disassembly and 
his comments. Article on the disassembler. 

So this is Woz's hand notes? 

Well, it's hand notes, it's various articles. 

Here's a disassembled disassembler. 

Uh ha. But all written by hand. 

Written by hand. Yup. 

And let's see. Here for instance, here's an article on the 
cassette system. 

Ok. 

We (he?) gave up on using the cassette, but this actually is his 
handwritten notes on the cassette system. So ... 

This is a big book. He must have sat for hours writing this 
down . 

You know, somebody just went through a file drawer of his notes 
and put it in a binder. 

Oh. 

And there was only one of these in the Apple library. So ... 
Wow. 

Either I or one of my colleagues checked it out and made some 
copies because this was going to disappear into obscurity. 

This is the Woz Wonderbook? 

This is what it was called on the spine. 

This would have been [19] 77? 
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BILL GOLDBERG: Uhm, actually the first article on the first of this has a date 
of 9/20/77 [20 September 1977]. So, but this is just a 
collection of a lot of different ... this actually goes into 
explaining . . . 

BRUCE DAMER: Yeah . . . 

BILL GOLDBERG: Yup. The detail that, you know ... I'm sure some of this is 
hideously proprietary but who will ever know. 

BRUCE DAMER: Well, not at this point. 

BILL GOLDBERG: Ok, so that's the Woz ... 

BRUCE DAMER: Woz ... 

BILL GOLDBERG: Actually, it won't hurt to write on the spine ... here take a 
pen, so its in your handwriting. That was my handwriting, so 
there's nothing special about that. 

### 
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The Woz Wonderbook 

Credi ts 



Thanks to Bill Goldberg for donating this copy of the Woz Wonderbook. 

The DigiBarn Computer Museum and Curator Bruce Darner for providing it to the 
education and research community. 

David T Craig is to be thanked for resurrecting the Wonderbook into a modern 
digital format. 

And of course, thanks to Steve Wozniak for creating the Woz Wonderbook! 




Steve Wozniak circa 1977 and 1981 
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The Woz Wonderbook 

The End 
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